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INTRODUCTION 


HAL/S is a prograinming language developed by Intermetrics, Inc. 
for the flight software of the NASA Space Shuttle progrcun. 

HAL/S is intended to satisfy virtually all of the flight 
software requirements of the Space Shuttle. To achieve this, 
HAL/S incorporates a wide range of features, including appli- 
cations-oriented data types and organizations, real time 
control mechanisms, and constructs for systems prograinming 
tasks . 

As the name indicates, H.Mi/S is a dialect of the original 
HAL language previously developed by Intermetrics [Ij. 

Changes have been incorporated to simplify syntax, curb 
excessive generality, or facilitate flight code emission. 


REVIEW OF THE LANGUAGE 

HAL/S is a higher order language designed to allow prograimmers , 
analysts, and engineers to communicate with the computer in a 
form approximating natural mathematical expression. Parts of 
the English language are combined with standard notation to 
provide a tool that readily encourages programming without 
demanding computer hardware expertise. 

HAL/S compilers accept two formats of the source text, the 
usual single line format, and also a multi-line format corres- 
ponding to the natural notation of ordinary algebra. 


DATA TYPES AND COMPUTATIONS 

HAL/S provides facilities for manipulating a number of different 
data types. Its integer, scalar, vector, and matrix types, 
together with the appropriate operators and built-in functions 
provide an extremely powerful tool for the implementation of 
guidance and control algorithms. Bit and character types are 
also incorporated. 

HAL/S permits the formation of multi-dimensional arrays of 
homogeneous data types, and of tree-like structures which 
are organisations of non-homogeneous data types. 
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REAL TIME CONTROL 

HAL/S is a real tinie control language. Defined blocks of 
code called programs and tasks can be scheduled for execu- 
tion in a variety of different ways. A wide range of commands 
for controlling their execution is also provided including 
mechanisms for interfacing with external interrupts and other 
environmental conditions. 


ERROR RECOVERY 

HAL/S contains an elaborate run time error recovery facility 
which allows the programmer freedom (within the constraints 
of safety) to define his own error processing procedures, or 
to leave control with the operating system. 


SYSTEM LANGUAGE 

HAL/S contains a number of features especially designed to 
facilitate its application to systems programming. Thus, 
it substantially eliminates the necessity of using an 
assembler language. 


PROGRAM RELIABILITY 

Program reliability is enhanced when software can, by its 
design, create effective isolation between various sections 
of code, while maintaining ease of access to commonly used 
data. HAL/S is a block oriented language in that blocks 
of code may be established with locally defined variables that 
are not visible from outside the block. Separately compiled 
progreim blocks can be executed together and communicate through 
one or more centrally managed and highly visible data pools. 

In a real time environment, HAL/S couples these precautions with 
locking mechanisms preventing the uncontrolled usage of sensitive 
data or areas of code. 
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ABOUT THE PROGRAMMER'S GUIDE 


The Progrcunmer ' s Guide presents an informal description 
of the HAL/S Language to the potential HAL/S programmer. 

It is in no way meant to be an exhaustive catalog of all 
the various rules of the language. That is the function 
of the HAL/S Language Specification Document. However, 
after the HAL/S progreunmer has absorbed the material 
presented here, he should have been able to gain enough 
insight into the workings of the language to enable him 
to use the Language Specification to clarify any ambiguities. 

In order to execute a HAL/S program on any given machine, the 
programmer will need information contained in the HAL/S User's 
Manual appropriate for that machine. 

The Programmer's Guide is divided into three parts; 

• PART I is aimed at the new HAL/S user and contains 
enough information on the compiler language constructs 
to enable him to begin programming. 

• PART II describes other, more complex, HAL/S constructs 
which will be used regularly in applications programming. 

• PART III presents progreimming examples designed to 
illustrate and clarify important complex HAL/S Language 
constructs. Some of the examples are constructs too 
advanced to be descrrbed in PARTS I and II, but which 
are formally defined in the HAL/S Language Specification. 
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Part I of the Progranuner ' s Guide is oriented toward new users 
of HAL/S. It covers all the simpler constructs of the language 
and contains sufficient information for suprisingly complex 
programs to be written. Sections of text delimited by hori- 
zontal bars are comments referring to the existence of more 
complex HAL/S constructs to be explained in Pazt II. 
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1. STRUCTURE OF HAL/S 


This section ^ives an overview on an abstract level of the 
overall properties of HAL/S compilations, and tries to relate 
these properties to the need for good prograi’iming practice. 
Later sections of the Guide interpret these properties in terms 
of actual HAL/S Language constructs. 


1.1 STRUCTURING AND HIGHER ORDER LANGUAGES 


A common method of problem solving is the so-called "top down" 
approach. The algorithm for solving the problem is first out- 
lined broadly, and then, step by step, delineated in successively 
deeper levels of greater detail. The success of the algorithm 
in arriving at the solution lies as much in its ability to break 
down the problem into its simplest component parts, as in its 
ability to resolve the problem as a whole. 

If a problem is to be solved by programming it in a higher order 
language, then the "top down" approach is of especial interest 
because it lends insight into how the program can be organized. 
Specifically, the organization takes the form of an outer program 
block encloring numerous nested "subroutines"*. On the outermost 
level, the program is only concerned with the broad outlines of 
the solution, and relegates the first level of detail to the outer 
set of subroutines. These in turn relegate the next level of 
detail to an inner set of subroutines, and so one until each 
level of the problem has been relegiitod to the appropriate set 
of subroutines. 


* Here the term "subroutine" is ''oosely used in its 
generally recognized sense, conveying the idea of 
a subordinate block of code executed by calling it, 
and returning to the caller on completion. HAL/S 
uses different terminology, to be introducted later. 
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This particular progr^l^uninq technique is partly what is meant 
by "structured programming". This term also implies an ability to 
form nested groups of executable statements inside a progrcun 
or subroutine. On each .’evel of nestinc , a statement group 
has the ability to behave as if at were a single executable 
statement. 

The overall effect of structured programming techniques is to 
introduce an orderliness into the writing of progreuns that 
not only makes them easier to read but also far less prone to 
error. Most modern higher order languages possess constructs 
out of which structured programs can be created; the constructs 
of the HAL/S language have been defined deliberately with 
structured programming in mind. 

1.2 THE BLOCK STRUCTURE OF HAL/S 


The structure of a HAL/S compilation, as indicated below, 
generally consists of a program block with so-called 
procedure and function blocks nested within it. 
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Function and procedurt* blocks constitute the HAL/S 
interpretation of the "subroutines" of Section 1.1. 

The more deeply such a block is nested, the greater 
the depth of detail of the problem solution it is 
supposed to handle. The blocks at each level contain 
executable code implementing the appropriate part of 
the problem solution. 

Both kinds of block are similar in that they contain 
code which is executed by a call or "invocation", 
and which returns execution to the caller on comple- 
tion. However, procedure and function blocks differ 
in the way they are invoked. A procedure is invoked 
by a CALL statement, while a function (like its mathe- 
matical counterpart) is invoked by its appearance in an 
expression, and returns a result*. 

Generally, the code in any block may invoke a procedure 
or function block defined at the same level, or in a 
surrounding outer level. The rules defining the 
region where a block may be invoked are discussed later in 
this Section. 

The forms of procedure and function blocks and the 
constructs for invoking them are described in Section 11 
of the Guide. The form of the outer program block is 
described in Section 3. 


* A procedure is therefore like a Fortran SUBROUTINE, 
and a function is like a Fortran FUNCTION. Note, 
however, that Fortran SUBROUTINES and FUNCTIONS 
are always exterior to the program calling them, 
whilst this is not true for HAL/S. 
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SCOPING OF DATA 


In HAL/S, all data must be defined in so-called "data declara- 
tions". An important consequence of the structural properties 
of HAL/S is its ability to place data declarations so as to bound 
the regions in a program which may reference the declared data. 
This feature is called "scoping". 


Data declared at the program level may generally be used through- 
out the entire compilation: 




region where program 
data declarations are 
known; i.e. the "scope* 
of program data 
declarations . 


'program 


linner blocks 


i 
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In addition, any procedure or function block nested within a 
program block may declare local data - data known only in that 
particular block and in blocks nested within it - as indicated 
below: 




region where 
data declared 
local to X are 
known 



region where 
data declared 
local to Y are 
known 


SCOPING OF BLOCK NAMES 

The program block, and every procedure or function within it 
are named; block names have scoping rules identical with 
the data scoping rules already described. The name of any 
procedure or function block is deemed to have been "declared" 
in the surrounding block in which the procedure or function 
is nested. This bounds the region where its name is known, 
and therefore determines where it may be invoked. Thus, 
the name of any procedure or function nested at the 
program level is known anywhere in the program. However, 
since in HAL/S recursion is not allowed, such a procedure 
or function may be invoked from anywhere in the program 
except inside itself , as indicated ; 
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Similarly, inner procedures and functions may be invoked from 
anywhere in the block enclosing them except within themselves 

In the following example, inner block B and C can only be 
invoked from inside regions X and Y respectively: 




region where 
block B may be 
invoked 



region where 
block C may be 
invoked 
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It should be noted that all forms of recursion in HAL/S 
are illegal. The form of recursion not prevented by 
the rules given above is that in which procedures P and 
Q are not contained in each other, but P calls Q and Q 
calls P. 


It is also possible for a program 
(or any block within it) to in- 
voke entities outside the compila- 
tion unit; i.e. other compilation 
units. Procedures emd functions 
may be compiled independently for 
this purpose. 

See: (tbd) 


1-8 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-1840 



1.3 STATEMENT GROUPING IN HAL/S 


In HAL/S, the actual step by step solution of a problem is 
performed by executable statements contained in the blocks 
comprising the program. Sequences of executable statements 
may be grouped together and treated as a single compound 
statement. Such statement groups are said to be "well- 
bracketed" - they begin with a special statement (a "DO" 
statement) , and end with another special statement (an "END" 
statement) . Execution of the sequence of statements in the 
group can be controlled in various ways depending on the form 
of the opening "DO" statement; 

• the sequence may be executed once only; 

• the sequence may be executed repetitively until specified 
conditions are met; 

• one statement in the sequence may be selected as the 
only one to be executed. 

Sequences of compound statements may also be grouped together 
in the same way and, in turn, be treated as a more complex com- 
pound statement, and so on to an arbitrary degree of nesting. 

Use of this grouping property in conjunction with other HAL/S 
constructs can substantially eliminate the need for a "GO TO" 
statement (in the Fortran sense, for example) , which from the 
structured programming viewpoint is recognized to be "dangerous" 
because it destroys the readability of a program, and makes it 
more error-prone. 


STATEMENT GROUPS AND GO TO STATEMENTS 

The design of HAL/S minimizes the dangers of "GO TO" statements 
by limiting the regions which can be branched to by them, in a way 
analogous to the limits imposed on data by the scoping rules 
described in Section 1.2. 
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The region of legal destinations of "GO TO" statements contained 
in group Y are as indicated below: 



program 


region of 
legal des- 
tinations 
of GO TO's 
in Y 


innermost 
group Y 


It is evident from the examples that while groups can be branched 
out of, or branched within, they may not be branched into. 


INTERACTION WITH BLOCK STRUCTURE 

Since procedure and function blocks may appear anywhere in a program, 
including inside statement groups, the problem arises of branches 
by means of "GO ,T0" statements in and out of such blocks. 

In HAL/S, the destinations of "GO TO" statements are labels attached 
to executable statements. Because the scope rules for statement 
labels are the seune as for declared data, it follows that it is 
impossible to branch into a procedure or function block. Additionally, 
a rule is made that branches may not be made out of a block (even 
though by scope rules the label of the destination is visible) . 

This leaves the reciprocal processes of call and return- to-caller 
the only ways of entering and leaving procedures and functions, 
which is in accordance with structured programming principles. 


IT 
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1.4 


SUMMARY 


This section has been concerned with the structural properties 
of HAL/S compilations on an abstract level. It remains to be 
demonstrated in the ensuing sections of PART I how the properties 
are translated into sequences of actual HAL/S constructs. Section 
2 begins this on the most basic level by describing the 
characteristics of HAL/S source text. 
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2 . HAL/S SYMBOLOGY 


HAL/S source text has its own particular characteristics; 
a specific character set, special combinations of characters 
set aside as reserved words, and certain rules dictating 
the form of statements. This section is an introduction 
to these characteristics of the HAL/S Language. 


2.1 THE CHARACTER SET 

The HAL/S language uses the following character set: 

ABCDEFGHIJK.LMN0PQRSTUVWXY2 

abcdefghijklmnopqrstuvwxyz 

01234bu789 

+-*./|- 4 =<>#§$,; :”*) (_%« 

(blank) 


This character set is a subset of the standard character sets 
ASCII and EBCDIC. 

Although the user really needs only the above character set 
when writing a HAL/S program, there are additional special 
characters which can be used in comments and in character 
string literals (described later in this section) . 


( J { ) : ? 


The output listings produced by a HAL/S compiler may use these 
extra special characters for annotation. 
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2.2 RESERVED WORDS, IDENTIFIERS, m LITERALS 

The HAL/S language uses four kinds of primitive elements as 
basic constructs; 

• RESERVED WORDS are a fixed part of the language and consist 

of combinations of upper case alphabetic characters; 

• IDENTIFIERS are user**def ined names used for data or labels, 

and consist of combinations of the alphanumeric characters; 

• LITERALS express actual values, and can consist of any of the 

symbols in the character set; 

• SPECIAL CHARACTERS serve as delimiters, separators or 

operators, and consist of the non-alphanumeric 
characters of the HAL/S set. 


RESERVED WORDS 


Reserved words are words having a standard meaning in the HAL/S 
language. As their name suggests, the user cannot use reserved 
words as identifier names. There are two major categories of 
reserved words: 

• KEYWORDS are used to express parts of HAL/S statements, for 

exanqple:GO TO, DECLARE, CALL, and so on. A complete 
list can be found in Appendix 

• BUILT-IN FUNCTION NAMES are used to identify a library of 

common nTathemat..cal and other routines, for example: 
SINE, SORT, TRANSPOSE, and so on. A complete list can 
be found in Appendix . 
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IDENTIFIERS 


An identifier name is a user-a*if^i;ned name identifying an 
item of data, a statement or block label, or other entity. 
The following rules must be observed in the creation of 
any identifier name*. 


1. The total number of characters in the name 
must not exceed 32; 

2. The first character must be alphabetic; 

3. The remaining characters may be either 
alphabetic or numeric; 

4. Any character except the first or last 
may be an underscore (_) . 




Examples: 

ELEPHANT AND CASTLE \ 

A1 ” " f legal 

P 


IB 
X X 


I illegal 


1 : 


* Some implementations of HAL/S may place extra restrictions 
upon the names of identifiers. 


n 


\ 
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LITERALS 

The three basic kinds of literals described here are arithmetic, 
character string, and Boolean. The utility of arithmetic 
literals is obvious. In simple programming problems, character 
string literals find most use in the generation of output. 
Boolean literals are used to state logical truth or falsehood. 


• ARITHMETIC LITERALS express numerical values in de^^mal 

notation. The generic form of an arithmetic literal 
is: 


mantissa 



•exponent 


iddd .dddcitddd 


1. ddd represents an arbitrary 
number of decimal digits. 

2. The exponent is optional. 

3. The 4- signs are optional. 

4. The decimal point is optional. 

If absent, it is considered to be 
to the right of the least signi- 
ficant digit of the mantissa. 

If the decimal point is present, 
it may appear anywhere in tne mantissa. 

5. The minimum number of digits in the 
mantissa, and in the exponent* if 
present, is one. The maximum 
number is implementation dependent. 

(See Appendix ) . 


2-4 

■NTERMETRiCS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE MASSACMUSET TS 02138 • i6 7i 661 1840 



1 


I 


! 


Examples : 


0.123E16 

45.9 

-4 

It is important to note that HAL/S makes no distinction 
of type between a integral-valued literal and a fractional- 
valued literal. Either integer (with possible rounding of 
value) or scalar (i.e. floating-point) type is assumed 
according to the context in which the literal is used. 


The use of multiple exponents » 
and of binary, hexadecimal or 
octal exponents, is also allowed. 
See; (tbd) . 


« 4 
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• CHARACTER STRING LITERALS consist of strings of characters 
chosen from the entire HAL/S character set. The 
generic form is; 


'ccccccc' 


1. The quote marks delimit the 
beginning and end of the 
literal. 

2. cccc represents an arbitrary 
number of characters in any 
combination. 

3. Quote marks within the literal 
must be represented by a pair 
of quote marks to avoid con- 
fusion with the delimiting 
quotes. 

4. The minimum number of characters 
is zero (a 'null' string), the 
maximum is 255*. 


i 


i 


* This value is implementation dependent. See Appendix 
for exceptions. 
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Examples : 


•ONE two THREE' 
'DOG' 'S' 


If a literal consists of a single 
character/ or character sequence 
repeated may times.- a condensed 
form of literal using a repeti- 
tion factor may be used. 

See; (tbd) . 


• BOOLEAN LITERALS express logical truth or falsehood, 
and are generally used to set up the values of 
Boolean data items (see later) , Their forms are: 


TRUE » 

expressing truth, or 

ON j 

binary "1" 

FALSE 1 

expressing falsehood 

OFF j 

or binary "0" 

* 

Literal strings 
also exist. 

See (tbd) * 

of binary values 
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2.3 FORMAT OF SOURCE TEXT 


HAL/S is a "stream-oriented" language, that is, statements 
may begin anywhere on a line (or card) , and may overflow 
without special indication onto succeeding lines or cards. 

Several statements may be written on one line (or card) as 
required. 

HAL/S is among the very few languages which permit subscripts 
and exporents to be represented as they are mathematically, 
using lines below and above the main line respectively as needed. 
This multi-line format is an optional alternative to the HAL/S 
single-line format. 

Even when .lulti-line format is not used, the first character 
position of each line (or card) is reserved for a symbol 
denoting the kind of line format, subscript, main, or 
exponent. 


S1N5LE-LINE FORMAT 

In single-line format, the first character position of each line 
is left blank, denoting a main line. An M can alternatively 
be used but is generally not preferred fay users. 


• EXPONENTS are denoted by the operator ** 

Exeunple: 

„t+2 . , , 

X IS coded as : 

:m x**(t+2) 

• SUBSCRIPTS are denoted by parenthesizing the subscript and 

preceding it with the symbol $. 

Example: 

a^^j^ is coded as: 

|m A$(I+1) 

‘ I ■ 
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I ■ ‘ MULTI-LINE FORMAT 

: In multi-line format, the first character of a main line 

is either left blank or M is inserted as before. The first 
. . character of an exponent line is E. and that of a subscript 

line is S. 


• EXPONENTS are written on an exponent line (E-iine) immediately 
above the main line. 

Example : 

t+2 . , , 

X IS coded as: 

•E T+2 
Jm X 


• SUBSCRIPTS are written on a subscript line (S-line) immediately 
below the main line. 

Example : 


a 


i+1 


is coded as: 


M A 
S I+l 


When using multi-line format, care must be taken to ensure that 
nothing on the E- and S-lines overlaps anything on the M-line. 


Exponents of exponents and sub- 
scripts of subscripts use extra 
subscript and exponent lines. 
Special rules apply if exponents 
are subscripted, or if subscripts 
possess exponents. 

See: (tbd) . 
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2.11 STATEMENT DELIMITING 


As Section 2.3 indicated, HAL/S statements may be written in 
free form without regard for line (or card) boundaries. Be- 
cause of this there is the need to explicitly indicate the 
end of each statement with a special symbol. HAL/S uses a 
semicolon for this purpose. The following statements arbitrarily 
selected from the language show the placement of the semicolon. 

Examples : 

: DECLARE I INTEGER; 

; 1 = 1 + 1 ; 

: CALL P(I,J) ; 


2.5 COMMENTS IN HAL/S 


The use of comments is a sine qua non of good programming practice. 
HAL/S possesses two mechanisms for the inclusion of comments in a 
compilation. 

• IMBEDDED COMMENTS may be placed anywhere on main, exponent 

or subscript lines of HAL/S text. 

• COMMENT LINES may appear between main, exponent and subscript 

lines of HAL/S text. 


IMBEDDED COMMENTS 

An imbedded comment takes the form: 
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Such comments may appear between HAL/S statements or imbedded 
in a statement. They may not appear in the middle of a literal, 
reserved word, or identifier. As far as the sense of the source 
text is concerned, an imbedded comment is treated as if it were 
a string of blank characters. 


Example : 

» 

'M X = X + 1; /* ADD ONE TO X */ 

I 

I 

COMMENT LINES 

Comment lines are input lines specially reserved solely for comments 
by placing the character C in the first character position of the 
line. The rest of the line may contain any desired text. 

Excunples: 

■ H X = X + 1; 

IC ADD ONE TO X 

'C THEN CARRY ON 


2.6 SUMMARY 

In Section 2, the most basic elements of the HAL/S Language have 
been outlined: reserved words, identifiers, literals, the 

formatting of the source text, and alternate forms of comment 
insertion. 

In Section 3, the overall form of a HAL/S program will be explained, 
with special references to how declarations of data and executable 
statements may be arranged within it. 
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3. 


A HAL/S COMPILATION - THE PROGRAM BLOCK 


The structuring of HAL/S programs was dealt with on the conceptual 
level in Section 1. Section 3 begins to interpret this infor- 
mation in terms of actual HAL/S language constructs. 

For the purposes of Part I, an entire HAi/S unit of compilation 
is known as the "program block". The te.rm "block" has a special 
connotation in this Guide, i c is taken co mean a coherent 
body of data declarations and executable statements enclosed in 
statements delimiting its opet\ing and closing , and identified 
with a name. 


3.1 OPENING AND CLOSING THE PROGRAM BLOCK 


The first statement of a HAL/S program is a statement defining 
the name of the program and opening the program block. The last 
statement of a HAL/S program is a statement closing the program 
block. Between the two are all the statements comprising the body 
of the program. 


PROGRAM OPENING 

The statement opening a program block takes the form; 


; labU : PROGRAM; 

I 

1. tabtt is any legal identifier 
name, and constitutes the name 
of the program. 
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PROGRAM CLOSING 


The program block is closed with the statement: 


; CLOSE 
1 

tabeZ ; 

1. The identifier tabeJL is 

optional. 


2. If ta.be t 

is supplied, it 


must be the program name, 
i.e. the iabiZ on the 
opening statement of the 
program block. 


Excimple: 


TEST; PROGRAM; 


body of program goes in here 


CLOSE TEST; 



3.2 POSITION OF DATA DECLARATIONS 

Normal HAL/S programs require the use of data. The names used 
to identify this data must be declared before use by the means 
of data declaration statements. Data declarations (and, 
additionally, certain other kinds of statements) must be 
placed after the program opening statement and before the 
first executable statement. 
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Example: 


' TEST; PROGRAM; 




' CLOSE TEST; 


I— ^data declaration statements 


j“*executable statements 


3.3 FLOW OF EXECUTION IN THE PROGRAM 

The program begins execution at the first executable state- 
ment after the data declarations, and thereafter follows a 
path determined by the kinds of executable statements encountered. 
Unless statement groups, or branching or conditional statements 
intervene, execution is sequential*. Finally, the path either 
reaches a statement terminating execution of the program, or 
reaches the closing statement of the program block, which has 
the same effect. 

As described in Section 1, procedure and function definition 
blocks may be interspersed between the statements in a progreun 
block. The only way of executing such blocks is by explicit 
invocation; if they are encountered in the path of execution 
they are passed over as if non-existent . 


This order is called the "natural order" of execution. 
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Example : 


TEST: PRC'^.RAM; 




path of 
execution 



data 

declaration 

■^statements 


^executable 

statements 


procedure 
•definition 
block 


block invoked 
and returned 
from 


3.4 SUMMARY 


Section 3 has described the opening and closing of a progreun 
block, has shown where data declarations are placed in it, and 
has explained the path of execution followed through a program 
block. The following chapters of Part I will begin to fill 
in the details of the possible contents of the block. Section 4 
describes how data is declared and referenced. It begins to 
build on the fundamental information given in Section 2. 
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DATA DECLARATION 


Programming largely consists of the manipulation of numerical 
data. The diversity of the data typej in a language determines 
its utility for any required task. HAL/S contains an exceptionally 
diverse set of data types. 

Identifiers of the kind described in Section 2 are :sed to name 
items of data. Identifier names used to represent data items 
must * be defined in data declarations appearing in the appropriate 
program, prodcedurs or function block. The effect of placing 
data in different blocks is described in Section 1. The position 
of data declarations within a program block is described in 
Section 3. 

This Section now proceeds to describe the detailed construction 
of data declarations. 


4.1 HAL/S DATA TYPES 


In the HAL/S language, arithmetic data of the following types 

can be declared: 

• INTEGER for the representation of integer-valued quantities; 

• SCALAR for the representation of "floating-point" quantities; 

• VECTOR for the representation of algebraic row or column 
vectors (without distinction) , and each element of which is 
a scalar quantity; 

e MATRIX for the representation of algebraic matrices, and each 
element of which is a scalar quantity. 


* The HAL/S language prohibits the use of implicitly declared 
data itens considering it to be an undesirable programming 
practice . 
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These arithmetic data types may oe specified in either single 
or double precision. In the case of integer, the precision 
determines the maximum absolute value the identifier may take 
on. In all other cases, it determines the number of signifi- 
cant digits in the mantissa of the value. 

In addition, HAL/S also possesses the following data types: 

• CHARACTER for the representation of strings of text; 

e BOOLEAN for the representation of binary-valued (logical) 
quantities. 

It is possible to declare arrays (or tables) of any of the six 
above types. 


HAL/S in fact allows more 
data types than just those 
described here. It also 
allows hierarchical organ- 
izations of data-types 
called ** structures". 

See: (tbd) 


i|.2 SIMPLE DECLARATION STATEMENTS 

Data declaration statements define identifiers used to neune data. 
The simplest forms of declaration statement for each data type 
listed above are examined on the following pages. 
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INTEGER 


, DECLARE ntvnz INTEGER; 

• DECLARE none INTEGER SINGLE; 

• DECLARE name INTEGER DOUBLE; 

I 

1. In each of the forms name is any legal 
HAL/S identifier. 

2. Presence of the keyword SINGLE specifies 
single precision. 

3. Presence of the keyword DOUBLE specifies 
double precision. 

4 . Absence of either keyword implies default 
of single precis on. 


Ft r the integer data type, single precision usually implies 
halfword and double precision fullword, depending on the 
implementation* . 


Examples : 

I 

I DECLARE 11 INTEGER; 

I DECLARE BIG I INTEGER DOUBLE; 


* See Appendix . 
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SCALAR 


DECLARE name SCALAR; 

DECLARE name SCALAR SINGLE; 

DECLARE name SCALAR DOUBLE; 

1. In each of the forms, name. is any 
legal identifier. 

2. Presence of the keyword SINGLE specifies 
single precision. 

3. Presence of the keyword DOUBLE specifies 
double precision. 

4. Absence of either keyword implies a de- 
fault of single precision. 

5. The keyword SCALAR may be omitted. 


Double precision usually implies increased range of exponent 
and increased number of digits in the mantissa, but it is 
implementation dependent*. 


Examples: 

I 

: DECLARE SI; 

; DECLARE S2 SCALAR; 

: DECLARE S3 SCALAR DOUBLE; 


* See Appendix 
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MATRIX 


t 

: DECLARE name 
• DECLARE name 
; DECLARE name 


MATRIX (m,n) ; 

MATRIX (m,n) SINGLE; 
MATRIX (m,n) DOUBLE; 


1. In each form name is any legal identifier. 

2. Keywords SINGLE and DOUBLE have the same 
significance as for scalar and vector types. 

3. m and n denote respectively the number of 
rows and columns in the matrix. They must 
lie in the range 1 < m, n ^ 64*. 

4. If the size specification (m,n) is absent, 
a 3x3 matrix is assumed. 


Examples : 

« 

• DECLARE 
I DECLARE 
' DECLARE 


Ml MATRIX (2,4); 

M2 MATRIX (4,5) DOUBLE; 
M3 MATRIX; 



a 3x3 matrix 


* This value may be implementation dependent. See Appendix 
for exceptions. 
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VECTOR 


T 


; DECLARE 

name. 

VECTOR (n) ; 

: DECLARE 

name 

VECTOR (n) SINGLE; 

• DECLARE 

f 

name 

VECTOR (n) DOUBLE; 

1. In each 

form 

name is any legal 


identifier. 

2. Keywords SINGLE and DOUBLE have the 
same significance as for scalar type. 

3. n specifies the length of the vector 
and must lie in the range 1 < n 64*. 

4. If the length specification (n) is 
omitted a length of 3 is assumed. 


Examples : 


; DECLARE VI VECTOR ( 10 ); 

. DECLARE V2 VECTOR (3) DOUBLE; 
' DECLARE V3 VECTOR; 


( 



3-vector 


* This value may be implementation dependent. See Appendix 
for exceptions. 
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CHARACTER 


‘DECLARE name CHARACTER (n); 


1. name is any legal identifier. 

2. n specifies the maximum length of the text 
string that the data type may carry. (i.e. 
the maximum number of characters) . It must 
lie in the range of 1 <: n $ 255*. 

3. The actual length of the string of text 
carried may vary during execution between 
zero (a "null" string) and the maximum n. 


Example 


DECLARE Cl CHARACTER ( 80 ) ; 


BOOLEAN 


} DECLARE name. BOOLEAN; 

I 

t 

1. name. is any legal identifier. 


Example : 

: DECLARE B1 BOOLEAN; 


* This value may be implementation dependent. See Appendix 
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ARRAYS 


In any of the above declarations, regardless of data type, 
the part of the declaration between the name and the 
terminating semicolon which establishes the type (and 
possibly precision and size) constitutes the "attributes" 
of the declaration. 

To declare an array of any data type an ARRAY specification 
is inserted between the name and the attributes: 


: DECLARE name ARRAY (n) otttcbatei ; 

1. att^butU stands for any legal form of 
attributes for any data type described. 

2. n denotes the number of elements in the array 
(i.e. entries in the table) and must lie in 
the range 1 < n < 32768*. 


Examples: 

; DECLARE ASl ARRAY (500) SCALAR; 

: DECLARE AMI ARRAY (20) MATRIX (4,4); 


* This value may be machine dependent. See Appendix 
for exceptions. 
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COMPOUND DECLARA.IOfS 


If a program contains declarations of many data items it is 
tedious to repeat the keyword DECLARE in every declaration. 
Many separate declarations may be condensed into one compound 
declaration as shown below. 


Example : 


DECLARE S; 

DECLARE I INTEGER DOUBLE; 

DECLARE M3 MATRIX; 

DECLARE M6 MATRIX (6,6); 

DECLARE B BOOLEAN; 

DECLARE C ARRAY (5) CHARACTER (20 ) ; 
DECLARE V ARRAY (3) VECTOR; 


separate declarations 


I DECLARE S, 

1 INTEGER DOUBLE, 

I M3 MATRIX, 

I M6 MATRIX (6,6) , 

I B BOOLEAN, 

, C ARRAY (5) CHARACTER (20 ) , 

I V ARRAY (3) VECTOR; 


J equivalent compound 
declaration 


Note the commas separating the declaration of 


each data item. 


If the identifiers in a compound 
declaration have some attributes 
in common, a third, even more 
compact, form of declaration 
called a factored declaration 
can be used. 

See: (tbd) 
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4.3 


INITIALIZATION OF DATA 


I 


A HAL/S data item of any type may be initialized by incorporating 
an INITIAL specification into its declaration statement. The 
form of such a specification differs depending on whether the 
data item is "uni-valued" or "multi-valued". 

• UNI-VALUED data items are those having only one element: 
unarrayed scalars, boo leans, and characters. 

• MULTI-VALUED data items are those having more than one 

element: unarrayed vectors and matrices, and arrayed 

data items of any type. 

In either case, the INITIAL specification is placed after the typo, 
precision, and size attributes of a declaration. This positioning 
will become apparent in the examples to follo«. 


UNI-VALUED DATA ITEMS 


The two variations of the form of INITIAL specification for 
uni-valued data items are: 


INITIAL ( value. ) 

CONSTANT ( value ) 

1. The two forms have the same effect in 
that the data item is initialized to 
the literal indicated by value . 

2. The form using the keyword CONSTANT is 
required' only if the user wishes not 
to change the initial value during 
execution*. 

3. The type of the literal must 

be compatible with the type of the data 
item as determined from the following 
table: 


data type 

literal value 

CHARACTER 

character string 

BOOLEAN 

boolean 

INTEGER 1 

SCALAR f 

arithmetic 


* In many respects a data item initialized this way is akin to 
a literal. 
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1 


1 


1 


1 


1 


! 
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Examples : 

I DECLARE A SCALAR INITIAL (3), 

B SCALAR CONSTANT (4 . 5E-3 ) , 

' C CHARACTER (80) INITIAL (' YES ') , 

I D BOOLEAN INITIAL (TRUE) ; 

I 

I Note: initial working length of C becomes 3. 


MULTI-VALUED DATA ITEMS 


There are two corresponding variations of the INITIAL specification 
for multi-valued data items: 


INITIAL ( vofue^ , vahiz^ , ) 

CONSTANT ( vcLtuz , vaJbxz , ) 

1. The meaning of the keyword CONSTANT is 
the same as for uni-valued data items. 

2. The type of each literal vaZuz must be 
compatible with the type of the data item, 
as determined from the following table. 


data type 

literal value 

CHARACTER 

character string 

BOOLEAN 

boolean 

INTEGER \ 
SCALAR 1 
VECTOR ( 
MATRIX ' 

arithmetic 


3. The n\imber of literals in the list must 

equal the total number of elements implied 
by the data declaration. 


Note that if all the elements of a multi-valued data item are to 
be initialized to the s£une value then the form used for uni-valued 
data items may be used. 
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Examples : 


‘declare V VECTOR INITIAL (1 , 2 , 3 . 5 ) 
j S ARRAY ( 2 ) CONSTANT (1,0), 

I T ARRAY (2) VECTOR(2) INITIAL (4 .7 , -5 . 3 , 0, 0) ; 

.'declare V VECTOR INITIAL (0), 

, S ARRAY(IOO) INTEGER INITIAL (2 56 ) ; 


all elements of these data 
items are identically 
initialized. 


ORDER OF INITIALIZATION 


To complete the specification of initialization the order of 
initialization of the elements of multi-valued data items 
needs to be defined. 

The following ordering rules, though applied here to the 
initialization of multi-valued data items, holds true when- 
ever the ordering of elements is called into question. 

• VECTOR data items are initialized in order of increasing 
index . 

• MATRIX data items are initialized row by row in order of 
increasing index. 

• ARRAY data items are initialized array element by array element 
in order of increasing index. Where the array element are 
themselves multi-valued, each array element in turn is 
initialized completely according to the previous rules before 
going on to the next. 


Example: 


DECLARE M ARRAY (2) MATRIX(2,2) INITIAL (1,2 , 3 , 4 , 5 ,6 ,7 , 8) ; 
if is the first array element, and M 2 is the second, then: 


M 


1 


1 2 
3 4 



5 6 
7 8 
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Additional more compact initialization 
forms are available if only partial 
initialization is required, or if 
subsets of the initial values are 
identical • See : (tbd ) 


SUMMARY 


Section 4 has dealt with how data is declared in HAL/S 
compilations, and how it initialized. The next logical 
step is to begin to discover how it may be used. However, 
this is put off until Section 6. Section 5 deals with a 
useful HAL/S construct which allows the user to replace 
frequently-repeated HAL/S expressions by defining and 
substituting a symbolic name. 

Study of Section 5 can be omitted without detriment to the 
understanding of the remainder of Part I of the Guide. 
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5. 


REPLACE STATEMENTS 


When it is necessary to repeat a particular HAL/S construct 
exactly many times during a program, the user can avoid the 
tedious process of laboriously writing it at length each time 
by defining a symbolic name to represent the construct, and 
then replacing the construct with the symbolic name. 

This kind of substitution can be of advantage in several 
ways. For instance, the value of a literal recurring many tiroes 
can be easily changed between successive compilations. The user 
need only define a symbolic name to represent the literal, then 
replace the one with the other. Only one line of the program 
needs to be recoded as opposed to the many lines that would 
need recoding if the user had to find and change the literal 
each time it occurred. 

The definition and substitutir.n of the symbolic name is 
accomplished by a REPLACE stateivent. 


5.1 THE REPLACE STATEMENT 


The REPLACE statement is placed together with the data 
declarations of the program, procedure, or function block in 
which it is to be used. It takes the form: 



I 

I REPLACE time. BY "XXXXXXXXXXX" ; 

t 

1. XXXXXXX represents the KAL/S source text which 
it is desired to substitute. The text is de- 
limited by double quote marks, and must be 
written in single line format. 

2. name is the symbolic name chosen to repre- 
sent the text. It may be any legal identifier 
name. 

3. XXXXXXX may be any legal source text of arbi- 
trary length. Imbedded double quote marks 
must be represented as a pair of double quote 
marks to avoid confusion witK the delimiters. 

4. The text must not begin or end in the middle 
of a reserved word, identifier, literal, or 
imbedded comment. 
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Examples : 


REPLACE OUTPUT BY "WRITE (6) 
REPLACE INCREMENT BY "X=X+l;"j 


5.2 USING REPLACE STATEMENTS 

The following examples show the way in which the symbol 
substitution defined by the REPLACE statement is used. 

Examples : 

I 

I REPLACE DV BY "VECTOR DOUBLE INITIAL (0)"; 

, DECLARE VECl DV, 

I VEC2 DV, 

. VEC3 DV; 

- by expansion of DV it is evident that 
VECl, VEC2, VEC3 are all double precision 
vectors initialized to zero. 


REPLACE N BY "4"; 

DECLARE VI VECTOR (N) , 

Ml MATRIX (N,N) , 

M2 MAY. IX (2, N) ; 

- this shows the utility of the REPLACE 
statement in making it easy to change the 
sizes o' several vectors and matrices 
simultaneously. 


REPLACE X BY "VECTOR(2)"; 

REPLACE Y BY "ARRAY (5) X"; 

* this is an example of nested sub- 
stitutions. The expansion of Y is 
APRAY(5) VECTOR(2). 


REPLACE X BY "REPLACE Y BY""2"""; 

X; 

DECLARE Y SCALAR; 

- although this is a legal use of REPLACE statements, it 
does not lend itself to clarity. The sequence of state- 
ments culminates in Z being declared as a scalar data 
item. 
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A REPLACE Statement takes effect only after it appears. 

It does not modify the entire block, only that section that 
follows its appearance. 

Example : 

I 

I DECLARE VI VECTOR (N)j 

i REPLACE N BY "4"; 

I DECLARE V2 VECTOR (N) ; 

I * 

* 

- the REPLACE statement will only be 
effective starting with the second 
declaration statement. N is un- 
known in the first declaration and 
compilation would detect the error. 


Care must be taken in using REPLACE statements because 
the ways in which they are affected by the block structure 
of the HAL/S program in which they appear are not always 
obvious . 

Example : 


REPLACE X BY "Y* 


DECLARE X SCAL/iR; 


Progreur. 


iProcedure block 


the user must remember 
that the X of the local 
declaration inside the 
procedure block is still 
subject to the REPLACE 
statement at the program 
level. 
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I 


The only case in which a REPLACE statement in an outer blocK 
becomes ineffective in an inner block is when the inner block 
has a replace statement in it with the same namr 


Example: 


REPLACE X BY "Y 



Program 



Procedure block 




region where X is 
replaced by Y 




region where X is 
replaced by Z 


statements nay also 
possess parameters, turning 
then into a so]^lsticated 
macro expansion facility. 
See: (tbd) . 
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5.3 SUMMARY 

Section 5 has dealt with a mechanism for symbolic replacement 
of HAL/S source text. Section 6 begins to examine the way in 
which executable statements are constructed by describing how 
data is referenced. 
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6. DATA REFERENCING AND SUBSCRIPTING 


Any appearance of the name of a previously-declared data item 
in an executable statement constitutes a reference to its value 
(and possibly causes a change in its value)*. Sometimes it is 
necessary to be able to reference elements of vectors, matrices, 
and arrays, and also to reference parts of character strings. 
HAL/S has a wide range of subscript forms designed for this 
purpose. 

Two kinds of subscripting are relevant to the data types 
described in Section 4. 

• COMPONENT SUBSCRIPTING allows the user to select elements 
or subsets of elements from vectors and matrices, and to 
select substrings from character data items. 

• ARRAY SUBSCRIPTING allows the user to select elements or 
subsets of elements from arrays of any data type. 

Depending on the nature of a particular data item, either or 
both kinds of subscripting may be affixed to it. 


6.1 SUBSCRIPTS OF UNARRAYED DATA TYPES 


Unarrayed data types, i.e. those whose declarations contain no 
array specification, may at most possess only component subscript- 
ing. Unarrayed data items of integer, scalar, and Boolean 
types may not possess any subscripting. Allowable subscripts 
for the remaining types, - character, vector, and matrix - are 
now each described in turn. 


* This Section, for convenience, includes appearance causing 
change in value under the term "reference”, even though 
this is not the most usual meaning of the term. 
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CHARACTER 


In a character data item, character positions are indexed left 
to right starting from 1. In the subscript forms given below, 
STRING represents an unarrayed data item of character type with 
current working length L.* 

• To select the character from STRING: 


STRING 

a 

1. a is an integer expression in 
the range 1 ^ a ^ L. 


• To select a characters from STRING, starting from the 
6 th: 

AT 6 

1. a and 6 are integer expressions. 

2. 6 is in the range I 6 ^ L. 

3. a is in the range 0< L- 6+1. 


* In the case where reference of a subscripted character data 
type causes a change in its value (e.g. on the left hand side 
of an assignment) , somewhat different interpretations of the 
subscript forms hold true. An account of these is given in 
Section 8.3. 
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• To select a substring starting with the character 
of STRING, and ending with the gth; 


STRING „ a 
a TO 6 

1. 01 and 6 are integer expressions in 
the range 1 ^ a, 3 L. 

2. 6 > a. 


Examples; 


if the value of C is 'ABCDEF' then: 


is 'E' 


^2 AT 2 
^4 TO 6 


VECTOR 


Elements of a vector are indexed starting from 1. In 
the following subscript forms, VEC represents an unarrayed 
vector data item of length L. 

• To select the element from VEC: 



VEC 



a 


1. 

a is an integer expression 

in the 


range 1 ^ a < L. 


2. 

The resulting data type is 

scalar . 
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i 

I 


• To select an a-vector partition starting from the 
element of VEC: 



VEC , „ „ 




a AT 8 



1. 

a is an integer 

literal value 

in 


the range 2 .< 8 

< L. 


2. 

8 is an integer 

expression in 

the 


range 1 .< 8 ^ L 

- a + 1 . 



• To select a partition starting from the ath element of 
VEC and ending with the 6'^^. 



= 4.5 (scalar) 

V3 TO 4 (2-vector) 

2*7 

^2 AT 1 “ ( 2 -vector) 

9*3 
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MATRIX 


Rows and columns of a matrix are indexed starting from 1. 

Any matrix subscript must consist of a row subscript followed 
by a column subscript. In the following subscript forms, MAT 
represents an unarrayed M x N matrix data item. 

• To select the element of MAT common to the row and 
gth 

column: 



MAT - 

a, 6 


1. 

a, 6 are integer expressions. 

2. 

a is in the range 1 $ a 
and B is in the range 1 

$ M, 

$ B $ N. 

3. 

The resultant data type 

is SCALAR. 


• To select the a^h row of MAT: 


MAT ^ 

a, * 

1. a is an integer expression in the 
range 1 ^ a ^ M. 

2. The resultant data is N-vector. 

3. If the asterisk is replaced by a 
TO- or AT- subscript under the 
rules given for vector data types, 
a vector partition from the 

row may be selected. 
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• To select the 6^^^ column of MAT: 


MAT „ 

* , 0 

1. 6 is an integer expression in the 
range 1 ^ g .< N. 

2. The resultant data type is M-VECTOR. 

3. If the asterisk is replaced by a 
TO- or AT- partition under the 
rules given for vector data types, 
a vector partition from the gth 
column may be selected. 


• To select a a x y matrix partition starting from the 
gth j-ow and 6^^ column of MAT: 


MAT , „ „ , m r 

a AT g , Y at 6 

1. a, Y ^re integer literal values in 
ranges 2<a^M, 2^Y^N 
respectively . 

2. g,Y are integer expression in 
ranges 1^ g<M-a+l, 
1^6 <N-y+ 1 respectively. 

3. Either or both the AT- subscripts 
may be replaced by TO- subscripts 
under rules already given by vector 
and matrix types. 

4. Either of the AT- subscripts may in 
addition be replaced by an asterisk 
if all M rows or all N columns are 
to be included in the partition. 
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Examples : 
if 


M = 


1.1 

2.1 

3.1 


1.2 

2.2 

3.2 


" 2 , 3 - 


M 


*,1 


1.1 

2.1 

3.1 


M 


2, 2 TO 3 
2 AT 1 


M 


::i] 


then 


(scalar) 

(3-vector) 


1 TO 2, 1 TO 2 


[ i.i 1.2 
2.1 2.2 
3.1 3.2 

[1.1 

L2.I 


(2-vector) 

(3x2 matrix) 


J] 


(2x2 matrix) 
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6.2 


SUBSCRIPTS OF ARRAYED DATA TYPES 


Arrayed data types, i.e. those whose declarations contain 
an array specification, inay possess array subscripting. 

If the data types are vector, matrix, or character, then 
they may, in addition, possess component subscripting. 


ARRAY SUBSCRIPTING ONLY 


Arrays are indexed starting from 1. In the array subscript 
forms given below, TABLE represents an array of length L 
of any data type . 

• To select the ath array element from TABLE: 


TABLE 

a : 

1. a is an integer expression in the 
range 1 ^ a ^ L. 

2. The colon is optional if the data 
type of TABLE is integer or scalar. 


• To select a sub-array of length a starting from the 6'*^^ 
array element of TABLE: 


TABLE 

a AT 


6 : 


1. u is an integer literal value in the 
range 1 ^ a < L. 

2. B is an integer expression in the 
range 1^ B<L-a+l. 

3. The colon is optional if the data 
type of TABLE IS integer or scalar. 
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• To select a sub-array starting from the array 

element of TABLE and ending with the & 



TABLE „ 0 
a TO 6 : 


1. 

a, S are integer literal 

values 


in the range 1 ^ a, B < 

L. 

2. 

6 ^ a. 


3. 

The colon is optional if 
type of TABLE IS integer 

the data 
or scalar. 


Examples: 

if T is a 4-array of booleans with values 
(TRUE, FALSE, TRUE, TRUE) then; 

T2. is FALSE (unarrayed) 

T3 TO 4: (TRUE, TRUE) (still arrayed) 

if T is a 4-array of integers with values 
(1,2, 3,4) then: 

T2 is 2 (unarrayed) | 

Tj TO 4 (3,4) (still arrayed) \ 

if C is a 3-array of characters, with values 
(’YES’ , 'NO' , 'MAYBE* ) then: 

is 'YES' (selects first array element) 

,pQ 3. is ('NO' , 'MAYBE' ) (still arrayed) 


optional colon 
omitted 
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ARRAY AND COHPONENT SUBSCRIPTING 


If TABLE represents an array of vector, matrix, or character 
data type, then the following rule shows how array and 
component subscripting are juxtaposed. 


TABLE 

oAAaij- component 

1 . cuiAaij represents array sub- 
scripting of any of the forms 
previously described. 

2, component represents a’^y form 
of component subscripting legal 
for the data type of TABLE, as 
described in Section 6.1. 


The purpose of the colon now becomes clear: it is required 

to distinguish and separate array and component subscripting. 


Examples : 

if C is a 3-array of characters, with values 
('YES’ , 'NO' , 'MAYBE' ) then: 

is 'Y' (selects character from third 

array element) 

if M is a 2-array of 2x2 matrices with values 


1 

3 


2 

4 


M 


2 : 2,2 


8 


5 

7 


I j then : 

(element in 2*^*^ row, 2^<^ column 
of second array element) 
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Apparently, the colon should be 
opticnal on Boolean data types 
also. It is not because the 
Boolean data type is a degener- 
ate case of a bit string data 
type which may possess com- 
ponent subscripting. 

See: (tbd) . 


COMPONENT SUBSCRIPTING ONLY 


When an arrayed data item of vector, matrix or character 
type is required to be given only component subscripting, 
array subscripting cannot be totally omitted . Rather, it 
must be replaced by an asterisk. Let TABLE represent such 
a data item; the subscripting form is then required to be: 


TABLE 

* : compone.nt. 

1. compomut represents any form 

of component subscripting legal for 
the data type of TABLE, as described 
in Section 6.1. 


Examples: 

if C is a 3-array of characters with values 
( • YES ' , ’ NO ' , ’ MAYBE ’ ) then : 


C , is ( ' Y* , *N' , 'M' ) (makes 3-array from first character 

of each item) 


if M is a 2-array of 2x2 matrices with values 

then: 


1 2 
3 4 


5 6 
7 8 




(2-array of 
array of 
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HAL/S allows more general forms of 
subscript expressions than just 
those stated in Section 6. In 
addition, a symbolic form of 
reference to the last array or 
other element of a data type is 
allowed. Even more complex 
forms of subscripts apply to parts 
of tree organizations of data 
( * structures * ) . 

See: ftbd) 


6.3 SUMMARY 


This section has comprehensively described the forms of 
subscripting available in HAL/S. At this point in the Guide, 
sufficient information has been given to allow the user to be 
able to reference different kinds of data. Section 7 shows 
how operations may be performed on the data so referenced. 
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7. 


EXPRESSIONS 


Section 6 dealt with the referencing of declared data items. 
At this point it is appropriate to describe how tne values of 
these data items can be manipulated. In HAL/S the construct 
which specifies operations on data items is called an 
"expression"*. In many cases it is very close in form to 
the generally accepted notion of a mathematical expression. 

Generally, expressions consist of sequences of operations, 
possibly parenthesized in places to override the precedence 
rules of HAL/S. Each operation is comprised of one or two 
operands and an operator. The very simplest form of expres- 
sion is one in which there are no operations and j -jt one 
operand. An operand may be a data item, possibly subscripted, 
or a built-in function, or an explicit conversion function. 
This section begins by describing the legal HAL/S operations, 
and then continues to show how they are combined into 
expressions. 

Previous sections of the Guide have divided data items and 
literals into three broad classes: arithmetic, character, 

and Boolean. It is convenient to divide the operations to 
be described into the same three classes. The type of an 
expression is the type of the value resulting from iti 
execution, and may, in general, be different from the types 
of some of its operands. 


7.1 ARITHMETIC OPERATIONS 

Arithmetic operations are the most numerous of all operations 
in the HAL/S language. They comprise operations on vector, 
matrix, integer, and scalar data types. HAl./S recognizes 
the following operations: 


The storing of the result of a HAL/S expression into a 
data item is performed by an ASSIGNMENT statement, of 
which the expression forms a part. 
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Symbol 

Purpose 

★ ★ 

exponentiation, inversion, 
transposition 

(blank) 

multiplication 

* 

vector cross product 

• 

vector dot product 

/ 

division 

+ 

addition 


subtraction, negation 


NEGATION 

Negation is a binary operation applicable to any arithmetic 
data type: 


Symbolic form: - r 

1. The legal data types for R are given 
by the following table: 

R-type 

MATRIX 

VECTOR 

SCALAR 

INTEGER 

2. Negation of vector and matrix types 
implies element-by-e] ement negation. 


Examples : 


if I is an integer and 125 
then -I H -5 

if V is a 3-vector and V = 
and - V 


1.5 
1-4.2 
L-5.1 
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ADDITION AND SUBTRACTION 


Addition and subtraction can only take place between compatible 
arithmetic data types: 


Symbolic form: L ± R 

1. The legal combinations of data types 
are indicated by the following table: 


L -type 

R -type 

MATRIX 

MATRIX 

VECTOR 

VECTOR 

SCALAR \ 

1 SCALAR 

INTEGER ( 

\ INTEGER 


2. Operations on matrix and vector operands 
imply element-by-element addition and 
subtraction. 

3. The operands in a matrix addition or 
subtraction must have the same row and 
column diiiiensions. 

4. The operands in a vector addition or 
subtraction must have the same lengths. 

5. In a mixed integer-scalar operation, the 
result is scalar. The integer operand is 
first converted to single precision 
scalar. 
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Examples : 

If I is integer with 1=5 
S is scalar with S h -4.2 
then 


I + 1 

-3 6 

(integer result) 

I + 0.5 

2 5.5 

(scalar result) 

S + 1 

s -3.2 

(scalar result) 

I - S 

= 9.2 

(scalar result) 

VI is a 

3-vector 

with VI E 

-1.0 
-2.5 
. 3.2 

V2 is a 

4 -vector 

with V2 E 

r 0.5 


0 

- 2.2 

L 1.5, 

then the operation VI + V2 is illegal because the lengths of 
VI, V2 do not match; 


but 


VI - V2 


1 TO 3 


-1.5 
-2.5 
L l.OJ 


is legal because subscripting 
of the R operand has produced 
a 3-vector. 


Using S, VI above, 

S + VI is illegal because the types are incompatible; 

but S + Vl^ = -1.0 is legal and has a scalar result because 

subscripting has changed the R operand to 
scalar type. 
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if Ml is a 3 X 2 matrix with Ml 


^ r 1.0 o' 

-0.5 -1.0 

.0 0 . 

M2 is a 2 X 2 matrix with M2 - [0.5 -0 . 5 | 

(l.O i.ol 

then Ml - M2 is illegal because the row dimensions of the 
operands do not match; 

but. Ml- arn 1 . “ - 1 0 . 5 0.5] is legal because the 

' 1-1.5 -2.0 1 number of rows in the 

L operand have been 
reduced to 2 by sub- 
scri 'ting. 

DIVISION 

In division, the dividend may be any data type, but the divisor 
must either be integer or scalar. 


Symbolic form: ^ / ^ 

1. The legal combinations of data types are 
given by the following table: 


L_-t^l£e 


R 




MATRIX ) 

VECTOR ( ( SCALAR 

SCALAR 1 \ INTEGER 

INTEGER ' 


2. If the dividend is of matrix or vector 
type, element-by-element division by the 

R operand is implied. 

3. If either or both operands are of integer 
type, they are first converted to scalar 
type. 
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Examples 


if V 


1/2 
is a 


= 0.5 

3-vector 


(both integer operands converted to scalar) 
with V - [ 2 . 0 ] 


then 


V/2 


1.0 

2.0 

.3.0. 


if M is a 2 X 2 matrix with M - [1.0 -0.5] 

I 0.2 0 . 6 ) 

S is a scalar with S = 0.5 


then S/M is illegal since the R operand may not be of matrix 
type, 

but M/S i [2.0 -l.Ol 
10.4 I. 2 I 


DOT PRODUCT 

The HAL/S dot product operation corresponds to the mathematical 
dot or inner product of two vectors. In mathematical notation: 

s = <u, v> or s = u"^v 

where u, v are column vectors and T denotes the transpose. 

Note that HAL/S does not require the user to distinguish between 
row and column vectors because the position of the operand in the 
operation is sufficient in itself to allow it to be interpreted 
as one or the other. 


Symbolic 

form: i , R 

1. The operands of the dot product must be 

as shown : 


L -type 

R -type 

VECTOR 

VECTOR 

2. The lengths of 

each operand must be 

the Scune. 


3. The result is of scalar type. 
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Example : 


If V is a 3-vector with V 


' 0.5' 
1.0 
.-0.5 


then V.V =1.5 

CROSS PRODUCT 

The HAL/S cross product operation corresponds to the mathematical 
vector cross product in 3-dimensional Euclidean space: 

if w is perpendicular to u, v 
as shown, 

and lw| = ]u I I V 1 sin 0 
then w = u X V 



Symbolic form; L * R 

1. The type of the operands must be vector; 


L -type 

R -type 

VECTOR 

VECTOR 


2. Both operands must be of length 3. 

3. The result is a 3-vector. 


Example : 

if VI is a 3-vector with VI 
V2 is a 3-vector with V2 


then VI * V2 ^ 


» I 

0.25J 


0.5 

0 

LO 

0 

0.5 

LO J 
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MULTIPLICATION 


The HAL/S language has no explicit symbol for multiplication: 
the adjacency of two operands signifies this operation. Multi- 
plication can take place with arithmetic operands of any type: 




If operand types are either integer or scalar, multiplication 
in the regular arithmetic sense is implied; . . .CASE 

if one operand is integer or scalar, and the other vector or 
matrix, then element-by-element multiplication is implied; 

. . .CASE 








if both operands are vectors then the outer product is implied, 
the result being a matrix; 


. . .CASE 


© 

if both operands are matrices, the matrix product is implied; ^ 

. . . CASE ( 4 ) 




if one operand is a matrix, and the or.ier a vector, then 
a vector-matrix product is implied, the result being a 
vector. ...CASE 



The symbolic form for multiplication is as shown: 


Symbolic form: L R 

1. At least one blank character must 
separate the L and R operands . 


The additional rules applicable to each of the cases described above 
are now listed in turn. 
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CASE @ 


The operand 

types are 

L-type 

R -type 

integerI 

i INTEGER 

SCALAR > 

1 SCALAR 


3. If both operands are integer, the 
result is integer, otherwise it is 
scalar , 

4. If one operand is integer, then it 

it first converted to single precision 
scalar . 


Example: 

If I is integer with I 3 10 

then 1.5E-2 I e 0.15 (scalar result) 


CASE d) 


2. The operand types are; 


L -type 

R -type 

INTEGER 1 

( VECTOR 

SCALAR f 

1 MATRIX 

VECTOR ) 

i INTEGER 

MATRIX I 

1 SCALAR 


3. Element-by-element multiplication 
of the vector or matrix is implied. 

4. If an operand is of integer type, it 
it first converted to single precision 
scalar. 
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Examples 


if S is scalar with S E 1.5 

M is a 2 X 2 matrix with M i [ 0 0.3] 

l-O.l 0.4l 


then 

S 

M ^ I 0 

0.45' 



1-0.15 

0.6 J 

and 

M 

Silo 

0.45] 



1-0.15 

0.6 J 


CASE (T) 


2. The operand types are: 

I- type I P-type 
VECTOR I VECTOR 


3. If the L-operand is of length m, 
and the R operand is of length .i, 
the result is an m x n matrix. 


Examples : 


VI is a 3-vector with VI - f 

1.0‘ 




-1.0 



1 

1.0. 

V2 is a 2-vector with V2 5 

|0.5| 




l0.6l 

then VI V2 i 

0.5 0.6 


(3 x 


-0.5 -0.6 




0.5 0.6 



and V2 VI i 

fO.5 -0.5 

0.5 

1(2 X 


[0.6 -0.6 

0.6 

J 


2 matrix) 


3 matrix) 
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CASE (?) 


2. The operand types are; 


L-type 

R-type 

MATRIX 

MATRIX 


3. The number of columns in the 

L operand must equal the number of 
rows in the R operand. 

4. If the L operand is an m x n matrix 
and the R operand is an n x p matrix, 
the result is an m x p matrix. 


Examples: 

If Ml is a 2 X 3 matrix with Ml 


1.0 1.0 2.0 

0.5 -0.5 1.0 


M2 is a 3 X 

then Ml M2 s 
and M2 Ml £ 


2 matrix with M2 i 


[0 3.5 I (2 X 

lo 0.751 

0.25 -0.25 0.5 

0.5 -0.5 1.0 

0.5 -0.5 1.0. 


0 0.5" 

0 1.0 
.0 1 . 0 . 

2 matrix) 


(3x3 matrix) 


Note that by using partitioning subscripts that 

Ml^ 2 TO 3 illegal because of dimension mismatch; 


but M2 Ml 


*,2 TO 3 


-0.25 

-0.5 

-0.5 



is still legal 
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CASE 




I 2 . The operand types are: 


L~ type 

R-t^e 

VECTOR 

MATRIX 

MATRIX 

VECTOR 


3. If the L operand is an m x n matrix, 
the R operand must be an n-vector, 
and the result is an m-vector. 

4. If the L operand is an m x n matrix, 
the R operand must be an m-vector, and 
the result is an n-vector. 


Note that the position of the vector operand again determines 
its interpretation as either a row or column vector. 


Examples: 

If M is a 

V is a 

then V M 


3x2 matrix with M 


0.5 

0 

0.2 


3-vector with V 


1.0 

- 1.0 

1.0 


0.7 

0.4 


( 2- vector ) 


l.O' 

1.0 

0.4. 


and M V 
however , 


is illegal because of dimension mismatch; 


M V 


1 TO 2 



is legal. 
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EXPONENTIATION. 


INVERSION AND TRANSPOSE 


In HAL/S, a single operator serves for exponentiation, matrix 
inversion, and matrix transpose, the operand types serving to 
distringuish between them. 

• If both operands are integer or scalar, then exponentiation 

is implied; ...CASE 

• if the left operand is a square matrix, .ind the right is 

an integer-valued literal, a repeated matrix product or repeated 
product of inverse is implied; ...CASE 

• if the left operand is a matrix, and the right operand is 

the character 'T', then the transpose is implied. ...CASE 

These operations take the general symbolic form: 


Symbolic form: L •* R 

1. This is the one-line format version. 

In multi-line format the operator symbol 
is omitted and R is placed on an exponent 
line. See Section 2.3. 


The rules for each of the cases listed above are now described in 
turn. 
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0 0 




CASE Q 


2. 

The operand 

types are: 


L -type 

R -type 


INTEGER I 
SCALAR f 

/ INTEGER 
» SCALAR 

3. 

If the L operand is integer and 
the R operand is a non-negative 
integral-valued literal, then the 
result is integer, otherwise it is 
scalar. 

4. 

Consistent with Rule 3, if the result 
is scalar, then any integer operands 
are first converted to single-precision 
scalar. 


Examples: 


If I is an integer with 135 


then 

I ** 2 i 

25 

(integer 

result) 

and 

I**-l : 

0.2 

(scalar 

result) 

also 

2**0. 5 : 

/2 

(scalar 

result) 
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CASE (2) 


2. The operand types are; 

L -type 

R - t^pe 

MATRIX 

INTEGER 

3. The L operand is a square matriA. 

4. The K operand is an integral-valued 

1 literal. 

The following table shows I 

1 the effect of different ranges of I 

values of 

the R operand: 

va lue 

result 

1*2 

repeated product of inverse 

-1 

inverse 

0 

unit matrix 

1 

no* jperation 

; 2 

repeated product 


Ex2unples: 

If M is a 2 X 2 matrix with M •' I 0.5 1] 

1-0.5 01 

then : (-0.25 0.5] 

k-0.25 -O. 5 I 

M-l : |0 -=] 

and ^ (1.0 0 ( 

lo i.o! 
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CASE 


© 


2. The operand types are: 


L -type 

R-type 

MATRIX 

T 


3. If the L operand is an m x n matrix, 
then the result is an n x m matrix. 

4. If R is symbolically T, then transpose 
is indicated even if T is a declared 
data item. 


Examples: 

If M is a 2 x 3 matrix with M ^ [1.0 0 3.0 1 

12.0 0 4.ol 


then M* 


1.0 

0 

.3.0 


if V is a 3-vector 


2.0 

0 

4.0, 

with v: 


' 1 . 0 ' 

2.0 

.3.0. 


then V is illegal because the L operand is not matrix type . 
The transpose of a vector is not needed in the HAL/S language. 
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NOTE ON PRECISION CONVERSION 


It is possible that the precisions of the two operands may differ 
in any of the operations described. In these cases, precision 
conversion usually takes place before the operation is executed. 
The rules under which it takes place are as follows: 


1. No precision conversion is possible in 

unary operations: transposition is 

considered a unary operation. 

2. Where an operation specifies type con- 
version from integer to single precision 
scalar, this conversion is carried out 
first. 

3. If only one operand is integer and no 
type conversion is implied , no precT¥ion 
conversion takes place. 

4. If both operands have the same precision, 
the result is of the same precision (even 
if not of thr same type) . 

5. If the operands have mixed precision, the 
single precision operand is converted to 
double precision. Then rule 4 is applied. 
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7.2 CHARACTER OPERATIONS 


There is only one character operation in HAL/S : the catenation 

of character strings. 


Symbol 

Purpose 

CAT ^ 

catenation 


CATENATION 


The utility of catenating character strings is obvious in 
the generation of output listings. The rules related to 
the catenation operation are as follows: 


Symbolic form: f | 1 R 

CAT 

1. The L and R operands are not just 
restricted to character type: some 

degree of implicit type conversion 
is allowed. The following types are 
legal . 


L-type 

R-type 

INTEGER I 

(integer 

SCALAR ) 

\ SCALAR 

character) 

1 CHARACTER 


2. The rules for converting integer and 
scalar types to character type are to 
be ^ound in Appendix 
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Examples : 

If C is a character item with C = ' UNITS' 
I is integer with I 10 


then 

•TEN* 

M c = 

•TEN UNITS 


I 1 

1 C E 

'10 UNITS' 

and 

I 1 

1 I = 

' 1010' 
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7.3 


BOOLEAN OPERATIONS 


Boolean operations are logical (binary) transformations on Boolean 
operands. HAL/S recognizes the following operations; 


Symbol 

Purpose 

AND / 

logical intersection 

I i 

OR » 

logical conjunction 

NOT } 

logical complement 


COMPLEMENT 

The complement operation complements the logical value of a 
Boolean operand. It takes the following form: 

Symbolic form: "* R 

NOT 

1. The R operand is of Boolean type. 


Example : 

If B is Boolean with B - TRUE 
then -B 5 FALSE 


7- 20 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (6i7) 661-1840 




CONJUNCTION 


The conjunction operation causes the logical values of two 
Boolean operands to be OR'ed together. 


Symbolic form: 


L I R 

OR 


1. The 1 and R operands are of Boolean type. 

2. The truth table for the resulting Boolean 
is as follows: 


T= 

TRUE 

1 ' 

. 1 

F= 

FALSE 

T 

F 

R 

T 

T 

T 


F 

T 

F 


Examples : 

If B is Boolean with B - FALSE 
then BjB ^ FALSE 
B I TRUE = TRUE 
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INTERSECTION 


The ’ •'.tersection operation causes the logical values of two 
Bool .an operands to be AND'ed together. 

Symbolic form: ^ ^ 

1. The L and R operands are of Boolean type. 

2. The truth table for the resulting Boolean 
is as follows; 


T=TRUE 

F=FALSE 

r 

T 

F 

R 

T 

T 

F 

F 

F 

F 


Examples ; 

If B is Boolean with B - FALSE 
then B&TRUE S FALSE 
B&B -■ FALSE 
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7./} COMBINING OPERATIONS & PRECEDENCE 


It is obviously desirable to be able to combine operations so 
as to create expressions of any required complexity. In combining 
operations, the following information is necessary: 

• The order in which operations are executed (th order 
of "precedence"); 

• the way in which the precedence order can be overriden. 

ARITHMETIC AND CHARACTER PRECEDENCE 


The precedence of HAL/S operations on arithmetic and character 
data types are shown in the following table: 


Symbol 

Precedence 

Purpose 

★ ★ 

FIRST 

1 

exponentiation, etc. 

(blank) 

2 

multiplication 

★ 

3 

cross product 

m 

4 

dot product 

/ 

5 

division 

+ 

6 

addition 

- 

6 

subtraction, negation 

11, CAT 

7 

catenation 


LAST 



Two rules clarify and modify this informati<"n: 

• Sequences of operations of the same precedence are evaluated 
left to right, except for ** and /, which are evaluated right 
to left. 

• Sequences of multiplications are sometimes reordered to minimize 
the number of elemental products required. 


7-23 

INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE MASSACHUSETTS OmS • <617 661 18A0 




Examples : 

In the following expression, the numbered pointers show 
the order of execution of operations: 

' RESULT OF STEP IS 'IjS 


BOOLEAN PRECEDENCE 


The precedence rules for Boolean operations are stated separately 
because there are no implicit conversions causing interaction 
with arithmetic and character operations. 



1+S2^ - V1.V2/2/2 



Symbol 

Precedence 

Purpose 


FIRST 


NOT 

1 

complement 

&, AND 

2 

intersection 

1 , OR 

— --- J 

3 

LAST 

conjunction 


Sequences of operations of the sanie precedence are evaluated 
left to right. 

Examples : 

In the following expression, the numbered pointers show the 
order of execution of operations: 

-B1 


|B2 & ^ B3 

Id 
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OVERRIDING PRECEDENCE ORDER 


Tn HAL/G, the order of precedence can be overriden at will by 
the use of parentheses, nested to any arbitrary depth. 

Example <5 : 

In the following Boolean expression, 

B11b 2 & B3lB4 & B5 

<b k) 

parentheses may change the precedence order as shown: 

(B1 |B2) & ( (B3 |B4) & B5) 

(i^ d) d) 

In the following arithmetic expression, 



parentheses may change the precedence order as shown: 



HAL/S allows the operands 
in an expression to be 
arraye i, causing parallel 
evaluation on an element- 
by-element basis. 

See : ( tbd) . 
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7.5 SOME EXPLICIT CONVERSIONS 


As evidenced in Section 7, there are few implicit type conversions 
in the HAL/S language. However, there is a comprehensive range of 
explicit conversions, some of which ar now described. 

PRECISION CONVERSION 


Any arithmetic expression may have its precision explicitly 
changed as follows: 


touble 

1. In the first form, if cxpieiifon is 

a single precision arithmetic precision, 
it is converted to double precision. 

If it is already double precision, the 
conversion has no effect. 

2. In the second form, if cxpiciiccu is 

a double precision arithmetic expression 
it is rounded to single precision. If 
it is already single precision, the 
conversion has no effect. 


Example : 

If A and B are single precision, then the result of 

DOUBLE 

is double precision, he type remaining unchanged. 
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VECTOR CONVERSION 


A vector can be synthesized from a list of scalar or integer 
expressions using the construct shown in the following table: 


VECTOR^ { ) 

1. The subscript number n specifies the 
length of the vector to be created, and 
lies in the range 1 < n £ 64*. 

2. If n is omitted the resulting vector is 
assumed to be of length 3 . 

3. Each exp is a scalar or integer 
expression. 

4. The number of expressions in the list 
must match the implicit or explicit 
result length. 

5. The result of the above conversion is in 
single precision. 

6. The matrix is assembled row by rc'v ’■r'-.i 
the list. 


Examples : 


VECTOR (1, 2, 3) 

creates a 3-vector with value fll 



* This value may be implementation dependent. See Appendix 
for exceptions. 
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if S is a scalar with S =0.5 then 
VECTOR^ (S, S+1, 0) 


creates a 4-vector with value 


0.5 

0.251 

1.5 

.0 


Note that even if the arguments ire double precision the result 
is in single precision. To specify double precision in a vector 
conversion, the following modified form is used: 


VECTOR^ double, n ^ ^ 

1. The meanings of exp and n are as before. 

2. If n is not specified, the preceding comma 
is 0 . 1 SO omitted. 


Examples: 


VECTOR^ 


DOUBLE 


2, 3) 


creates a double precision 3-vector with value 



DOUBLE, 4<^' 2, 3,4) 


creates a double precision 4-vector with value 


T 

2 

3 


L4J 
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MATRIX CONVERSION 


There exists a method of synth-'oizing a matrix from a list of 
integer or seal ar expressions analogous to the vector conversion 
described : 


MATRIX ( , (Lxp^ , ) 

m. n ' ' 

1. The subscript numbers m, n specify the 
row and column dimensions of the m-rtrix 
to be craaujd, and must lie in the range 
1 < m, n ^ ()4*. 

2. The subscript may be omitted, in which 
case the resulting matrix is assumed to 
be 3 by 3. 

3. Each exp is a scalar or integer 
expression. 

4. The number of expressions must match the 
total number of elements in the resulting 
matrix. 

5. The result of the above conversion is .in 
single precision. 


* This value may oe implementation dependent. See Appendix 
for exceptions. 
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Exan tes : 


MATRIXd, 2, 3, 4, 5, 6, 7, 8, 9) 


creates a 3 x 3 matrix with value 


1 2 

4 5 

.7 8 


3' 

6 

9. 


MATRIX ,(1.5, 0, 0, 0, 0.5, 0) 

creates a 2 x 3 matrix with value [1.5 0 O] 

lo 0.5 01 


Note the order of assembly in each case. 


As in the case of vector conversion, a modified form is required 
if the result is to be in double precision; 


MATRIX^ double, m, n^ ^ 

1. The meanings of m, n and exp are as 
before. 

2. If the dimension subscript is omitted, the 
preceding comma is also omitted. 


Examples : 

MATRIX^ QQy (1» 2, 3, 4, 5, 6, 7, 8, 9) 
creates a double precision 3x3 matrix with value 


HATRIXj^ double, 2, “-S' 

creates a double precision 2x3 matrix with value 


12 3 
4 5 6 
.7 8 9. 


1.5 0 0 

0 0.5 0 
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The explicit conversions described 
are those most commonly required for 
numerical analysis. However, HAL/S 
contains many other explicit con- 
version function forms corresponding 
to conversions between most data types. 
See: tbd. 

I 

» 

* 

i 

1 

i 


i 


i 


INTERMETBICS INCORPORATED • 70i CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 661-1840 


7.6 


BUILT-IN FUNCTIONS 


HAL/S possesses a comprehensive range of library or 
"built-in" functions that can be used as operands in 
expressions. Built-in functions have zero, one, or 
two arguments, and are written in a form akin to 
standard mathematical notation. 

Built-in functions are divided into five different classes, 
roughly according to purpose: 

• arithmetic 

• algabraic 

• vector -matrix 

• character 

• miscellaneous 

A full description of all built-in functions is given in 
Appendix . A brief explanation of some of the more 
important functions in each class is given below. 


ARITHMETIC FUNCTIONS 

Arithmetic functions perform simple arithmetic operations 
on scalar or integer arguments. Some arithmetic functions 
are: 


Function 

Comments 

ABS(a) 

returns la| (the absolute value of 
a) . a may be integer or scalar. 

DIV(a,B) 

returns the result of integer divi- 
sion of o by B. a and B may be 
scalar or integer; scalar values 
are rounded to integer before use. 

ROUND (a) 

rounds a scalar a to an integer. 

ODD (a) 

returns a Boolean result, which is 
TRUE if o is odd, and FALSE if a 
is even. 

SIGN(a) 

returns +1 if a ^ 0 and -1 if a < 0. 
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ALGEBRAIC FUNCTIONS 

Algebraic functions perform trigonometric and other 
transformations on scalar arguments. Some common 
algebraic functions are: 


Function 

Comments 

COS (a) 

returns cos a 

EXP (a) 

returns 

LOG (a) 

returns log a 
e 

SIN (a) 

returns sin a 

SQRT(a) 

returns 

TAN (a) 

returns tan a 


VECTOR-MATRIX FUNCTIONS 

Vector-matrix functions perform operations on vectors or 
matrices. Common vector-matrix functions are: 


Function 

Comments 

ABVAL(a) 

returns length of 
vector a 

INVERSE (a) 

returns inverse of 
square matrix a 

UNIT (a) 

returns unit vector 
in same direction 
as vector a 
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CHARACTER FUNCTIONS 


Character functions perform operations on character data. 
Some common character functions are: 


Function 

Comments 

LENGTH (a) 

returns current length 

1 

of character string a 

1 

TRIM (a) 

strips leading and 


trailing blanks from 


string a 


MISCELLANEOUS FUNCTIONS 

Some of the more important miscellaneous functions are: 


Function 

Comments 

DATE 

returns date at time of 
execution 

MAX(a) 

returns the maximum 
value in the integer 
or scalar array a 

MIN (a) 

returns the minimum 


value in the integer 
or scalar array a 

RANDOMG 

returns random number 
from Gaussian distri- 
bution with mean zero, 
variance 1, 
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Examples of use: 


SINE = SIN(X/2) + SIN(Y/2); 
X = ABVAL(V1*V2) ; 

' IF ODD(X) THEN RETURN; 


7.7 SUMMARY 


Section 7 has described how HAL/S expressions are synthesized 

operands and operators, and in what order such expressions 
are executed. Expressions, particularly of integer and scalar 
type, form parts of many HAL/S language constructs, section 6 
referred many times to the use of integer expressions in sub- 
scripting. 


Section 8 describes the assignment statement, which causes the 
result of an expression to be stored in some data item or 
items. 
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8. ASSIGNMENTS 


Section 7 described, in detail, the creation of HAL/S 
expressions used in numerous places in the language. 
The assignment statement is one such instance in which 
the value of an expression is assigned to a data item. 

For convenience, an assignment is classified according 
to the type of the receiving data item; that is, the 
data item being assigned into. Because HAL/S allows 
implicit type conversion, this type is not necessarily 
the same as the expression whose value is used in the 
operation. 

• Arithmetic assignments are assignments to matrix, 
vector, integer or scalar data items. 

• Character assignments are assignments to character 
data items. 

• Boolean assignments are assignments to Boolean 
data items. 


8.1 GENERAL FORM OF ASSIGNMENT 


The assignment statement is an instance of a HAL/S executable 
statement. It has a general form applicable to all types 
of assignment: 


Symbolic Form: L = R; 

1. L is the receiving data item. It 
may be subscripted or unsubscripted. 

2. Usually, R is an expression whose 
resultant value is to be used in the 
assignment. It may, of course, consist 
merely of a single operand. 
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Additional assignment rules are applicable which differ 
according to assignment type. 


8.2 ARITHMETIC ASSIGNMENTS 


Arithmetic assignments are those in which the receiving 
data type is matrix, vector, integer or scalar. 


MATRIX 

The receiving data item is a matrix. 


1 . The operand 

types are: 

L-type 

R-^pe 

MATRIX 

/MATRIX 


UNTEGER (rule 3) 


3. 


The number of rows and columns 
of the R-expression must be the 
same as those of the receiving 
data item. 

The only condition under which 
the R-type is integer is if it is 
the literal value zero. The 
assignment then creates a null 
matrix. 


Examples: 

If Ml is a 2x3 matrix with Ml i [l.O 1.0 2.0] 

L0.5 -0.5 l.oj 

M2 is a 2x2 matrix, 

M3 is a 2x3 matrix; 
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then 


I 

[M3 = 
results in 


I 

I M2 = 

I 

but 

I 

I M2 = 


results in 


I 

IM3 * 

I 


-Ml; 


M3 = 

-1.0 

-0.5 

•1.0 

0.5 

-2.0 

-1.0 


Ml; 

is illegal 

(column 

mismatch) 

Ml 

*, 2 

AT 2' 




M2 = 

1 1.0 
[-0.5 

2.0 

1.0 



0; 

results 

in M3 = 0 

0 o| 


0 0 0 


but 


•m3 


1 ; 


is illegal 


VECTOR 

The receiving data item is a vector. 


1. 

The operand 

types are: 


L-type 

R-type 


VECTOR 

/ VECTOR 

1 INTEGER (rule 3) 

2. 

The length of the R-expression 
must be the same as that of the 
receiving data item. 

3. 

The only condition under which 
the R-type is integer is if 
it is the literal value zero. 
The assignment then creates a 
null vector. 
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Examples : 


If VI is a 3-vector with VI 


1.0 

2.0 

0 


M2 is a 3x3 matrix, 
V2 is a 3-vector; 


then 


I 

I V2 = -VI; 

» 

results in V2 = 


I 

I M2 = VI ; 

I 

but 

1m2, = VI; 

I i. / * 


- 1.0 

- 2.0 

0 

is illegal (type mismatch) , 


is legal since subscripting reduces 
the L-type to 3-vector. 


and results in M2 


12 0 
111 
111 


(? indicates values unchanged by assignment) . 


Note 

I 

•V2 * 0; creates a null vector. 
I 
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INTEGER/SCALAR 


Integer and scalar assignments can be treated together 
because their rules are nearly identical. 


1. The operand types are; 


(•“type 

R-type 

INTEGER \ 

i INTEGER 

SCALAR i 

|l SCALAR 


2. If the L- and R-types 
do not match, type 
conversion of the result 
of the R>expression takes 
place before assignment. 

3. Scalar-to- integer conversion 
implies rounding of the value 
of the R-expression. 


Examples: 

If I is an integer, 

S is a scalar, and 
M a 2x2 matrix, then 

5 
8 

7.7 


;i-5, 

I I » 7.7; 
! S - 7.7; 


results in I = 
results in I = 
results in S = 


Given the last values above for S, I 


i 


I M 
I 


2.2 


« I - S; 
results in M = 



(? indicates va.'v.es unchanged by assignment) 

I 

I . ■ I; is illegal (type mismatch) 

I 
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NOTE ON PRECISION CONVERSION 


In an arithmetic assignment, the precisions of the receiving 
data item and of the R-expression may differ. In these 
cases, precision conversion of the latter t*kes place before 
assignment, under the following rules: 


1. The P-expression is converted to the 
precision of the receiving data item 
as necessary before assignment. 

2. If type conversion from integer to 
single precision scalar is implied, 
it takes place before precision 
conversion. 


8-6 

INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661 >1840 



1 


8.3 CHARACTER ASSIGNMENTS 

The receiving data item is character type. 


1. 

The operand 

types are: 


L-type 

R-type 



( CHARACTER 


CHARACTER 

INTEGER 
( SCALAR 

2. 

K-expressions of integer or 
scalar type are converted 
before assignment to character 
type. Conversion rules are to 


be found in 

Appendix 


Examples : 

If C is a character with C = 'ABCDE' and 
C2 is a character, 
then 

{ C2 = C^; results in C2 = 'C* 

» 

I C2 * 1573; results in C2 = ’1573’ 

I 

These apparently straightforward rules can become more complex 
in scnne situations. 

Generally, when the receiving data item is unsubscripted, its 
working length becomes the same as the length of the R- 
expression. However, if this would cause the declared 
maximum length of the receiving data item to be exceeded, 
then truncation of the excess from the right takes place. 
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Examples: 

If Cl is character of maximum length 10 
C2 is character of maximum length 1, 

then 

I 

I Cl = 'ABCDt'; 

I 

results in Cl = 'ABCDE' of working length 5 
but 

I 

IC2 = 'ABCDE'; 

I 

results in C2 = 'A' of working length 1 

If the receiving data item is subscripted, then this causes 
an additional complication. The rules applicable in such 
a case are as follows: 


Let 

STRING 

a 

denote, a receiving data item of 
character type: 

N is declared maximxim length 
n is working length before assignment 

1. The range of the subscript expression a 
is presumed to be in the range 1 - N; 
otherwise an error results. 

2. The length of the R-expression is adjusted 
to the length implied by a, either by 
truncation of the excess from the right, 
or by padding on the right with blanks. 

3. If the range of a lies inside the range 
1-n, then simple substitution of the char- 
acter positions implied takes place. 

4. If the range of a lies partly beyond the 
range 1-n, then the working length of 
STRING is increased appropriately. 

5. If the range of a lies totally beyond the 
range 1-n, the working length of STRING 
is increased appropriately, and the gap 
between the n^" character and the first 
position implied by a (if any) is filled 
with blanks. 
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Examples : 


Let Cl be character of declared maximum length 10 
with value Cl = 'ABCD' 

Then by Rules 2 and 3 : 


1 Cl, , = 'QQ'; 


2 TO 3 


results in Cl = 'AQQD' 
! Cl = ' 1234 ' • 

I 

results in Cl = 'A12D' 


I 


Cl = ' X ' • 

^^2 TO 3 ' 


results in Cl - 'AX D' 
By Rules 2 and 4 : 


I 


Cl, 5 = 'QQ': 


results in Cl i 'ABCQQ' 

(working length increased by 1) 
I 

I pi • Y • • 

I ^^4 TO 5 ^ ' 

results in Cl = 'ABCX ' 

(working length increased by 1) 

By Rules 2 and 5: 

: TO 6 - ’OO' ' 

results in Cl 5 'ABCDQQ' 

I (working length increased by 2) 

TO 9 = 

results in Cl = 'ABCD FGH' 


Clg = 'FGH' ; 


results in Cl = 'ABCD F' 
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8A BOOLEAN ASSIGNMENTS 

The receiving data item is of a Boolean type. 



Example : 

If B is Boolean, then 

I 

I B = FALSE; 

I 

results in B i FALSE 



8-10 

INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 661-1840 j 




1 


f 


i 


8.5 MULTIPLE ASSIGNMENTS 


Several data items may be assigned to the same R-expression 
in the same statement. The general form of such a multiple 
assignment is as follows: 


Symbolic form: 



1. The value of the R-expression 
is assigned to all ... 

in turn. 

2. Any L-type must be compatible with 
the R-type according to the rules 
stated in Sections 8.2 through 8.4. 

3. No particular order of assignment is 
guaranteed . 


Examples : 

If Ml is a 2x2 matrix, 
VI is a 3-vector 
I 


I Ml, VI = 0; 

1 


results in Ml s fo 

Ol , VI = 

0 

Lo 

oj 

0 



0 


If C is a character, 

I is an integer, 

I 

' C, I = 127.2; 

I 

results in C = ' 1.2720000E+02' , I s 127 
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I 


1 


I 


! 


! 

i 


with the above data items, 

I 

I Ml, C = 5; 

1 

is illegal because of data type mismatch between Ml 
and the R-expression. 

The following example illustrates the importance of Rule 3: 

If further X = 2, then 
I 

' Vl^, 1=1+1; 

I ^ 

has an 2 unbiguous result, depend ii g on the order 
of assignment. 


If I is assigned before Vl^, 


then Vlj = 

? 

? 

, otherwise Vl^ = 

? 

3 


3 


? 


(? indicates values unchanged by assignments) 


In HAL/S, the receiving data item 
or items may be arrayed. This can 
produce varying effects depending on 
whether or not the R-expression also 
is arrayed (i.e. has arrayed operands) . 
See: tbd. 
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8.6 SUMMARY 


Section 8 has described assignment statements by 
which the results of expressions can be assigned to 
one or more data items. Assignments often form the core 
of a program but are generally limited in effectiveness 
unless their execution can be controlled with a degree 
of flexibility. 

Section 9 begins to describe how execution can be 
controlled by introducing the HAL/S conditional, or IF, 
statement. 
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9. 


CONDITIONAL STATEMENTS AND BRANCHES 


Section 9 is primarily concerned with the HAL/S conditional 
statement, by which other executable statements may be 
conditionally executed (or by which their execution may be 
conditionally avoided). Together with statement groups, 
which will be described in Section 10, they form a crucially 
important part of the HAL/S language. 

The HAL/S language encourages programmers to avoid using 
GO TO statements to cause branches in execution. Their 
total elimination, however, is not desirable. This 
Section therefore also describes the HAL/S GO TO state- 
ment, and statement labels, which are their destinations. 
Statement labels are, in addition, needed for other constructs 
to be described in Section 10. 


9.1 THE CONDITIONAL STATEMENT 

In HAL/S, the simple version of the conditional statement is 
an "IF clause" containing an expression evaluable as either 
TRUE or FALSE, followed by a "true part" which is executed 
only if the IF clause is TRUE. The simple version may be 
augmented by a "false part" which is executed only if the 
IF clause is FALSE. 
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SIMPLE IF STATEMENT 


The form of the simple version is: 


, IF exp THEN itaXejnent 

I 

1. exp is an expression which is 
evaluable as either TRUE or 
F7VLSE. It may be either a 
BOOLEAN expression or a rela- 
tional expression (these are 
described in Section 9.2). 

2. 6tatme.nt constitutes the true 

part of the conditional statement. 
Except as noted in Rule 3 it may 
be any executable statement, 
either simple or compound . 

3. 6X:cU^m^nt may not possess a 

label, and may not be another 
conditional statement. 

4. If exp is FALSE, execution proceeds 

to the next statement. If TRUE, 

■i tcLtzrne.nt is executed first. 
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Examples: 

I 

I IF B|C then X = 0; 

' Y = 1; 

X is set to 0 if either B or C or both is true: 
the flow diagram for these events is: 



I IP B|C then DO; 

I X = X - 1; 

I Y = Y + 1; 

I END; 

The true part is a compound statement containing 
two assignments. 

I 

I IF B THEN 1 IF C THEN D » 0* ; 



* Illegal because true part Is a conditional statement# 
in violation of Rule 3. 


I 
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AUGMENTED IF STATEMENT 


When argumented with a false part, the IF statement takes 
the form; 


[ IF exp THEN i>taXmtnt ; 

I ELSE e£ie itaXemeiU ; 

1. The form of the IF clause and 
true part are the same as in 
the simple conditional state- 
ment. 

2. etie itat&vznt constitutes the 
false part of the conditional 
statement. It may be any 
unlabelled executable stata- 
ment either simple or compound. 

3. If exp is FALSE, execution 
proceeds to the next statement 
via eZie i>tcUejne.nt . If TRUE, it 
proceeds to the next statement 

via 6tcLte.mnt 
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Examples: 

I IF BjC THEN X = 0; 

I ELSE X = 1; 

' X is set to 0 if B or C or both is true, 
otherwise X is set to 1. The flow diagram 
for these events is: 



I If B|C THEN DO; 

, X = 1; 

I Y = 2; 

I END; 

I ELSE DO; 

X » 2; 

' Y = 1; 

I END; 

Here, both true and false parts are compound 
statements each containing two assignments each. 
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9.2 RELATIONAL EXPRESSIONS 


As was stated in Section 9.1, h-.t- are two valid forms 
of expression in an IF clause;, •,i';OLEAN, and relational. 
BOOLEAN expressions were descrii.ed in Section 7; relational 
expressions only appear in a limited number of HAL/S 
constructs, among them conditional statements, and are now 
to be described. 

The simplest form of a relational expression is merely a 
comparison between two like quantities. The result is 
either TRUE or FALSE. More complex forms of relational 
expressions result from combining comparisons with the 
BOOLEAN operators &, |, and 

COMPARATIVE OPERATIONS 


HAL/S recognizes the following comparative operators: 


S^Ttibol 

Purpose 

Class 

> 

greater than 


< 

less than 


<* 

less than or equals 


NOT > 
- > 

1 not greater than 

I 

> * 

greater than or equals 


NOT < 
- < 

1 not less than 


NOT » 

S 

1 

equals 

1 not equals 

II 
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The operands of comparative operations may, in general, 
be expressions of any of the types described in Section 7. 
Depending on the type of operand, the operators may be 
restricted to Class II only, or may be either Class I or 
Class II. 


• CLASS II ONLY 


Symbolic form: L NOT = 


1. Legal combinations of data types 
are indicated by the following 
table: 


L-type 


R-type 


VECT01 

MATRIX 

BOOLEAN 

CHARACTER 


VECTOR 

MATRIX 

BOOLEAN 

CHARACTER 


2. Comparison of vector and matrix 
operands implies element-by-element 
comparison. 

3. The operands in a vector comparison 
must be the same length. 

4. The operands in a matrix comparison 
roust have the same row and column 
dimensions. 
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Examples: 

If STRING is character type with 

STRING = 'ABC ' 

STRING = 'PQR' 
is FALSE. 

STRING = 'ABC 

is FALSE - character strings must be of the same 
length. 

If V, VI are 3-vectors with 


V 5 

-l' 

f 

VI = 

1 


-1 



1 


. 2. 



.-2 . 


then V = VI is FALSE, 

VI - V = 2 V is TRUE. 

If further V2 is a 2-vector with V2 = 

then VI s V2 is illegal because of length mismatch, 
but VI TO 2 ~ TRUE. 
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• CLASS 1 AND CLASS 1 1 



Examples: 

If I is an integer with 1=5 

then I = 5 is TRUE 
I < 4 is FALSE 
I >a 5 is TRUE 
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NOTE ON PRECISION CONVERSION 


It is possible that the precisions of the two operands 
may differ in any of the operations described. In these 
cases, precision conversion takes place before the opera- 
tion is executed. The rules under which it takes place 
are as follows: 


1. Where an operation specifies type 
conversion from integer to single 
precision scalar, this conversion 
is carried out first. 

2. If only one operand is integer and 
no type conversion is implied , no 
precision conversio..’ takes place . 

3. If both operands have the same 
precision, the result is of the 
same precision (even if not of 
the same type) . 

4. If the operands have mixed precision, 
the single precision operand is 
converted to double precision. Then 
rule 3 is applied. 
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COMBINING COMPARATIVE OPERATIONS 


Comparative operations may be combined as if they were 
BOOLEAN operands, using the rules for Boolean operations 
described in Section 7. It is important to note however, 
that c^wiparative operations are not BOOLEAN operands in 
the sense that they can be mixed with actual BOOLEAN data 
items. 

• Boolean expressions may contain no comparative operations. 

• Relational expressions may contain no Boolean operands. 


Examples: 

If VI, V2 are 3-vectors with 


VI = 

1 

< 

to 

III 

3 


2 


2 


3 


1 


and C is cheuracter with C = 'ABC 
then 


VI = V2jC^ = 'A' is TRUE 

VI = V2 & = 'A' is FALSE 

If B is Boolean tnen 

b|v 1 = V2 is illegal 


9-12 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-1840 



T 


1 


1 


PRECEDENCE 


The following table shows the precedence of operations 
involved in a relational expression: 


Symbol 


Precedence 


Purpose 


FIRST 



I , OR 


4 


operations involving 
operands of comparisons 


comparative 

operations 


logical operations 
on comparisons 


^ , NOT * 

* Any operand o^ this operator must always be parenthesized, 
and is evaluated immediately after evaluation of the 
operator itself. 
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T 


I 


i 


i 


Example : 


In the following expression, the numbered pointers show 
the order of execution of operations: 



THEN 


Section 9.2 ends with some more examples designed to 
clarify the foregoing. 


Exeunples: 

Let V be a 3 -vector with V 


1 

2 

3 


IFV = lSrV = 2 THEN V = 0; 
S 1 2 3 

IF V > 0 I V <0 THEN V = 0; 
S3 2 


The first statement will cause V3 to be set to 
zero since both comparisons are TRUE. Then 


V = 


1 

2 

0 


In the second statement, neither comparison in the 
relational expression is true. Hence, the "true 
part" is not executed and finally 


V = 


1 

2 

0 


as before. 
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9.3 LABELS AND BRANCHES 


In HAL/S, there are two entities involved in the 
branching operation: a GO TO statement, which, when 

executed causes the branch; and a "statement label" 
which is the destination of such a branch. HAL/S 
also uses statement labels for other purposes, which 
will become clear in Section 10. 


LABELS 


Labels are names chosen by the programmer and attached to 
statements. More than one label may be attached to a 
statement. The way of attaching a single label to a 
statement is as follows: 


I ZabeJ: : itatme.nt ; 

1. itotemeat is any executable 
statement or statement group 
(see Section 10) , with two 
exceptions. 

2. statement may not be the 
"true part" or "false part" of 
a conditional statement. 

3. ZaheJi is a user-defined 
identifier name (see Section 
2 . 2 ) . 
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Examples : 

I ONE: X = X + 1; 

I TWO: Y = 0; 

I 

The following are illegal since they violate 
Rule 2: 

I 

I IF X = 0 THEN ONE: Y = 0; 

I IP X * 0 THEN X = 1; 

I ELSE TWO: X = 3; 

However, the conditional statement itself may 
be labelled: 

I 

I THREE : IF X = 0 THEN Y = 1 ; 

I 


If more than one label is required, then they follow each 
other in sequence. 


Example : 

I ONE: TWO: THREE: X = X + 1; 

I 
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GO TO STATEMENT 


The GO TO statement specifies the label to which 
execution branches: it takes the form: 


I GO TO label ; 

I 

1. label is a label attached to 
some statement to which execution 
is to branch. 


Examples : 

I 

j GO TO ONE; 

The GO TO statement itself may be labelled: 
I 

I TWO: GO TO THREE; 


It is important to note that HAL/S places relatively 
severe restrictions on the placement of GO TO 
statements and where they may cause execution to 
branch to. Section 1.3 described this on the abstract 
level, and Section 10 further discusses it in connection 
with statement groups. 
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ELIMINATING GO TO STATEMENTS 


The Guide has stressed throughout that, according to structured 
f rograitutiing principles, GO TO statements are inherently un- 
desirable because they tend to disguise the program's flow 
of execution. 

It will be found that HAL/S contains a sufficient number of 
other constructs to allow GO TO statements to be substantially 
eliminated from a program. Following is an example showing 
the elimination of GO TO statements. 

Examples : 

I IF X > 1.5 THEN GO TO ALPHA; 

I IF X < 1.5 THEN TO TO BETA; 

I Y = Y + 1; 

' GO TO GAMMA; 

I ALPHA: X = X - 0.05; 

I GO TO GAMMA; 

BETA; X = X + 0.05; 

I GAMMA: , 


This example is progrcunmed in HAL/S in the simplest way 
(possibly having been translated from Fortran or an assembly 
language) . The profusion of GO TO statements disguises the 
simple flow of execution, which is interpreted by the following 
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} 


1 


The same algorithm is more clearly programmed 
as follows: 

I IF X > 1.5 THEN 
I X = X - 0.05; 

I ELSE 

I IF X < 1.5 THEN 
I X = X + 0.05; 

, ELSE 

, Y = Y + 1; 


9.4 SUMMARY 

Section 9 has described conditional statements, labels, 

GO TO statements, and the ways in which they affect the 
flow of execution in a HAL/S program. Some attempt has 
been made to point out both the good and the bad ways 
of using these statements. Section 10 goes on to describe 
statement groups and how the usage of the constructs described 
in Sections 9 and 10 are very often interrelated in well- 
designed HAL/S programs. 
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10. STATEMENT GROUPS 


Section 1.3 of the Guide introduced, on an abstract level, 
the idea of "statement groups", w’’ich could be treated as 
if they were simple executable statements, and could be 
nested one inside the other. The power of such a facility 
can be seen, for example, when it is used in conjunction 
with the conditional statement: (this is demonstrated later 
in Section 10.1). 

There is, in fact, a second, equally important reason for 
grouping statements in HAL/S: the execution of such groups 

can be controlled in a variety of ways. If no explicit 
specification is made, the sequence of statements is executed 
once only. By explicit specification: 

• the sequence may be repetitively executed until some 
condition is satisfied; 

• a single executable statement (or nest statement group) 
of the group, selectable at execution time, may be 
executed. 

Section 10 explains in detail how statements are grouped, 
and how execution control of the groups is specified. 


10.1 ''^LIMITING STATEMENT GROUPS 


In HAL/S, groups of statements are said to be "well-brac)ceted*'' : 
they are delimited explicitly by opening and closing statements 
which are themselves considered executable. 
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THE DO STATEMENT 


Every statement group is opened with a "DO" statement which 
is also used to specify control of execution within the group. 
It takes the generic form: 


j DO contAot ; 

I 

1 . c-utfiVio^ is a construct to be 
described. It specifies the manner 
in which the sequence of statements 
is to be executed. 

2. control is optional. If it is 
absent, the sequence of statements 
is executed in its natural order* 
once only. 

3. The DO statement is executable in 
that it may be labelled according 
to the Rules of Section 9. 


The particular instances of DO statements will be explained 
in Section 10.2. 


* The ^natural order" of execution was explained in 
Section 3.3. 
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THE END STATEMENT 


Every statement group is closed with an END staten’ent: 


I END fabet ; 

I 

1. The END statement is executable 

in that it may be labelled according 
to the Rules of Section 9. 

2. (’abc^ is optional; if present, 

the opening DO statement of the group 
must be labelled with iabe.i 


The label specification in an END statement is never 
functionally necessary in HAL/S. However, it should be 
regarded as giod programming practice because it 
facilitates cross-checking by the compiler. 


Examples: 


Two instances of statement groups are shown below. 

Even though details of execution control have not 
yet been explained, the form of the construct should 
be clear. 

I 

! DO WHILE I > 0; } opening DO statement 

: 1 = 1 - 1 ; i 

! A = 0; \ group of statements 

! S I i 

I END J closing END statement 


FIX: 

S 


DO FOR I = 1,25,16,2; 

A * -A ; I 

I I ) 

END FIX; | 


one statement in group 

label specification in 
END matches label of HO 
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The following ex -nples show the importance of being able 
to group statements together for use in conjunction with a 
conditional statement. 

I 

; IF S = 0 THEN 1=2; 

; C = ' RESET VALUE OF I TO ' | | I ; 


It is required to conditionally 
execute both assignments: one 

solution is - 


I 

I 

; IF S •"= 0 THEN GO TO NOSET; 

• 1 = 2 ; 

I C = 'RESET VALUE OF I TO ' | jl; 

I NOSET: 

I • 

I • 

« 

I 

I 

This solution is error prone and 
not in accordance with structured 
programming concepts: a better 

solution is - 

I 

I 

i IF S = 0 THEN DO; 

I 1 = 2; 

t C = ' RESET VALUE OF I TO 'Ml; 

I END; 

I 

I The whole of the group enclosed 

by DO ... END is subject to 
conditional execution. 
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10.2 REPETITIVE EXECUTION OF STATEMENT GROUPS 


The sequence of statements in a group can be executed 
repetitively until some condition is satisfied. In 
this section, two basic forms of DO statement causing 
repetitive execution are described: 

• The DO WHILE statement, in which execution is 
repeated while a relational or boolean expression 
remains true in value; 

• The DO FOR statement, in which the sequence is 
executed once for each of a set of assigned values 
of a "control variable". 


THE DO WHILE STATEMENT 

The form of the DO WHILE statement is : 


I DO WHILE conditicn ; 

I 

1. condUZion is any relational or 
BOOLEAN expression. It is 
evaluated prior to each cycle 
of execution of the statement 
sequence in the group. 

2. The next cycle of execution of 
the group proceeds if the value 
of condition is TRUE. 

3. If the value of condition is FALSE, 
the stopping condition is satis- 
fied. Execution proceeds to the 
statement following the END state- 
ment of the group. 
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Examples: 

I I = 9; 

• DO WHILE I > 0; 

5 1 = 1 - 2 ; 

; END; 

Here the group is executed 5 times, after which 
the value of I is -1. In flow diagram fona, 
the sequence of events is: 



I 

I 


It is possible for a group never to be executed: 

I 

: DO WHILE FALSE; 

; 1 = 1 - 2 ; 

! END; 
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! 


It is also possible for a group to be executed 
forever : 

: I = 0; 

' DO WHILE TRUE; 

. 1 = 1 - 2 ; 

; END; 


Normally in this case, the programmer would insert 
statements in the group removing this possibility: 

: I = 9, 

’ DO WHILE TRUE; 

I 1 = 1 - 2 ; 

I IF I < 0 THEN GO TO ALL_DONE; 

' END; 


There exists a variant of 
the DO WHILE statement 
called the DO UNTIL state- 
ment. Here execution of 
the group is assured at least 
once, whatever the value of 
the controlling expression.. 
See: (tbd) . 
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THE DO FOR STATEMENT 


The most widely used form of the DO FOR statement is: 


I DO FOR VOA = initidt TO {^Aj/iaJL BY AMCfimZYit ; 

1. is an unarrayed INTEGER or SCALAR 
data item (it may be subscripted if 
required) . It is called the "control 
variable" of the DO FOR statement. 

2. ■biitiat, ^inaZ and -cncAemen^ are integer 
or scalar expressions: 

• inZtZal is the initial value 
assigned to uoA . 

• incAm&nt is the amount by which 

vaA is incremented on each 
cycle of execution of the sequence 
of statements in the group. 

• ^inaZ is the value against which 

is tested at the start of 
every cycle to determine if the 
stopping condition is satsified. 

All three expressions are evaluated 
once prior to the first cycle of 
execution. 

3. The stopping condition is met when 
the value of vdX lies outside the 
range bounded by inZtZaZ and ^Inai . 

4. ZncAwejnt may be either positive or 
negative The phrase 

BY ZncAQjmznt 

is optional. If omitted, the implied 
increment is +1. 
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Examples: 

i DO FOR I = 1 TO 10; 
I X = I; 

: s T 

' END; 


Here the group is executed 10 times. I is 
initially 1, and increments each time until 
10 is reached. At the end of execution of 
the group, the value of I is 11. In flow 
diagram form, the sequence of events is; 
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: I = 7; 

! DO FOR I = I -1- 5 TO I - 3 BY -2; 
! X = X + I; 
i END; 


This example demonstrates some of the subtleties 
of the DO FOR statement. The initial and final 
values are precomputed as 12 and 4 respectively. 
Then I is reused as the control variable: the 

group is executed 5 times, and after the last 
cycle of execution, I retains the value 2. 


Care must be taken if the 
control variable is integer 
and the range expressions are 
scalar: rounding occurs 

during assignment of values 
in such cases. 

This DO FOR Statement may 
possess a WHILE or UNTIi. 
clause which furnishes a 
supplementary stopping con- 
dition. 

See (tbd) , 
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The DO FOR statement has a second form which is used if 
the values of the control variable do not form a regular 
progression: 


I DO FOR voA = exp\ exp^, ... exp”; 

I 

1. uoA is the control variable as before. 

2. Each exp is an integer or scalar 
expression. Values of the exp 's are 
assigned to voA. in turn prior to the 
execution of each cycle, on a left-to- 
right basis. 

3. Each exp is evaluated immediately prior 
to the cycle of execution in which it 
will be used. 


Examples : 

I 

: DO FOR I = 17,5,12,4; 

: X = I; 

: s I 

; END; 

Here, I takes the successive values 17, 5, 12, and 4. 
After the end of the last cycle, the value of I remains 
at 4 . 


1 = 7; 

DO FOR 1 = 1 + 5, 1 + 3, I + l, I-l, I-a.- 
X^X+I; 

END; 

Superficially, this example looks like a different 
way of expressing the second example for the first 
form of DO FOR statement: 

1 = 7; 

DO FOR I = I + 5 TO I - 3 BY -2; 

X = X + I; 

END; 
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1 


T 


I 


Hov/ever, the successive values of I in the new 
form (by Rule 3) are; 

12, 15, 16, 15, 12 

as opposed to 

12, 10, 8, 6, 4 

in the old form. 


Rounding also occurs if the 
control variable is integer 
and any of the control expres- 
sions are scalar. 

As before, the DO FOR statement 
may possess a WHILE or UNTIL 
clau'^e which furnishes a 
supplementary stopping condi- 
tion. 

See: (tbd) . 
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10.3 SELECTIVE EXECUTION OF STATEMENT GROUPS 


One statement of a group may be selected for execution 
by means of the DO CASE statement. The form of the 
DO CASE statement is: 


: DO CASE exp ; 

1. exp is an integer or scalar 
expression. 

2. If its value is k (after rounding 
if necessary) , then the state- 
ment of the group is selected for 
execution. 

3. A run time error results if k < 0 
or k is greater than the number of 
statements in the group. 


The flexibility of a DO CASE statement is understood when 
it is realized that the selected statement may be a 
compound statement (i.e. it may itself be a statement 
group) . 


Exeunple : 


I = 3; 

DO CASE I; 


X = 4; 


case 

X = 3; 
DO; 


case 

) 

X = 

7; 


Y » 
END; 

3; 

1 case 

X = 1; 


case 

X = 0; 


case 


END; 
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Execution results in the third statement being 
scheduled for execution, and the following 
values being set: 

X = 7, Y = 3 


?Ui ELSE clause may be added 
to the DO CASE statement which 
is executed instead of an 
error being signalled, if the 
value of the case variable is 
outside the legal range for the 
statement group. 

See: (tbd). 
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10.11 BRANCHING IN STATEMENT GROUPS 


Execution may branch out of any statement group via 
a GO TO statement. In those cases where the group is 
being respectively executed, execution obviously ceases 
before the stopping criterion is satisfied. Because GO TO 
statements are viewed unfavorably from the standpoint of 
structured programming, HAL/S possesses two statements 
expressly for executing controlled branches in statement 
groups. 

• The EXIT statement is, in effect, a controlled branch 
out of a statement group. 

• The REPEAT statement only applies to statement groups 
executed repetitively, and is a controlled branch back 
to the beginning of the group. 


THE EXIT STATEMENT 

The simplest form of the EXIT statement is: 


i EXIT; 

1. Its execution causes an immediate 
branch out of the innermost state- 
ment group in which it is enclosed. 

2. Execution is directed to the first 
statement following the END of the 
group branched out of. 
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Examples 



Arrow shows branch in execution if Z 3 


DO WHILE X > 0; 

X = X - 1; 

IF X > 2 THEN DO; 

IF Y = 3 THEN EXIT; 



Arrow shows branch in execu ion if Y = 3: execution 

branches to the end, but not out of DO WHILE ,roup. 


There exists a second form of the EXIT statement to allow branches 
out of other than the innermost statement group: 
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i EXIT k'ah,\( ; 

I 

1. Its execution causes a out 

of the enclosing stateme ^ group 
whose DO statement possesses the 
label t'abi’t' . 

2. Execution is directed to the first 
statement after the END of the grov^p 
branched out of. 


Example : 


ONE: DO WHILE X > 0; 

X = X - 1; 

DO FOR I = 1 TO 10; 

A = A + X; 

S II 

IF X = I THEN EXIT ONE; 
IF X = 0 THEN EXIT: 



The first EXIT statement causes a branch out of the 
outer group rather than the inner, by virtue of its 
label. 
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THE REPEAT STATEMENT 

The simplest form of the REPEAT statement is: 


: REPEAT; 

I 

1. It must be enclosed in a DO FOR 
or DO WHILE group. 

2. Its execution causes an immediate 
branch to the beginning of the 
innermost enclosing DO FOR or 

DO WHILE group. 

3. The next cycle of execution of 
the group then starts (unless 

of course the stopping condition 
is satisified) . 


Examples : 


I DO WHILE X > 0;. 

! X = X - 1; 

; IF X = 4 THEN 

J Y = Y + X; 

, IF Y = 1 THEN REPEAT; 

; END; 

I END; 




If Y i 1 then a branch back to the beginning of the 
DO WHILE is made. Note that although the DO WHILE 
is not the innermost group, it ^ the innermost 
repetitive group. 
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. X = 4; 

; DO WHILE X > 1; 

' X = X - 1; 

1 IF X = 1 THE 

1 Y = X; 

,S X 
I END; 

When X = 2 the REPEAT branch is executed: 
a new cycle of execution does not begin 
however because the initial test shows that 
the stopping condition is satisfied. 

As with the EXIT statement, there exists a second form of 
the REPEAT statement allowing branches back to the beginning 
of other than the innermost DO WHILE or DO FOR group: 



REPEAT; 


; REPEAT Habal • 

I 

1. Its execution causes an immediate 
branch to the beginning of the 
enclosing DO FOR or DO WHILE 
group whose DO statement possesses 
the label labct . 

2. The next cycle of execution of 
the group then starts (unless the 
stopping condition is satisfied) . 
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Example: 


S 

S 

S 


ONE; DO FOR I = 1 TO 10; 

J = I; 

DO WHILE J > 0; 

J = J - 1; 

X = X + J; 

J J 

IF X =25 THEN REPEAT; 

J 

IF X =0 THEN REPEAT ONE; 
J 

END; 

END; 

Z = 0; 



The second REPEAT statement restarts the outer DO FOR 
group rather than the inner DO WHILE by virtue of its label. 
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10.5 SUMMARY 


Section 10 has explained how statements may be grouped 
together into compound statements, and how such groups 
may be executed repetitively or selectively. 

At this point in the Guide, programs can be constructed 
using assignment statements, and controlling execution 
through conditional statements and statement groups. 

The judicious use of procedures and user functions is 
essential to the well-ordered structure program . 
Section 11 thus goes on to describe how procedures 
and functions are defined and invoked. 
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11. PROCEDURES AND FUNCTIONS 


Section 1.2 of the Guide introduced the block structure 
of HAL/S programs on the abstract level. To summarize 
any program can contain nested procedure and function 
blocks, which are two levels of "subroutines" 
characterized by the sequence: 

■invocoution -*■ exeottcon xeXuAn to cojULpa 

The invocation of procedures and functions is aoverned 
by well-defined name scoping rules. 

This section explains how, in practice, procedure and 
function blocks are defined in HAL/S, and describes 
how they are invoked and returned from. 


11,1 INTROJUCTION 

A procedure is a subroutine block invoked by a CALL 
statement. It may have two kinds of parcimeters: 

• INPUT PARAMETERS - by which values may be 
passed into a procedure only. 

• ASSIGN PARAMETERS - by which values may be 
passed into and out of a procedure. 

A function is a subroutine block invoked by the 
appearance of its name in an expression. It returns 
a value and therefore has a defined HAL/S data type. 
It may possess input parameters only. 
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RELATIVE POSITION OF BLOCK DEFINITIONS 

Section 1.2 described the scoping rules which determine 
the regions of a program where any given procedure or 
function block may be invoked. 

An important consequence of these rules is that a 
procedure invocation may either follow or precede 
its block definition. However, for other reasons, 
the invocation of a function block should normally 
always follow its block definition. 


A number of rules restrict 
the kind of function which 
may be invoked preceding 
its block definition. 

See: (TBD) 


11,2 BLOCK DEFINITIONS 


Procedure and function block definitions have forms very 
similar to the form of a program block, which was described 
in Section 3. The first statement is one defining the 
name and type of block, and listing its parameters. The 
last statement is a statement closing the block. 
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PROCEDURE OPENING 


The statement opening a procedure block takes the form: 


I label'. PROCEDURE ... ) ASSIGN ( ...) ; 

< 

1. label is any legal identifier 
ncime, and constitutes the name 
of the procedure. 

2. l}’ , are legal identifier 

names defining input para- 
meters. If the entire paren- 
thesized list is omitted, then 
the procedure has no input 
parameters . 

3. a^, a^ . . . are legal identifier 
names defining assign parameters. 

If the entire parenthesized list 
and the keyword ASSIGN are omitted, 
then the procedure has no assign 
parameters . 
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FUNCTION OPENING 


The statement opening a function block takes the 
form: 


I I 5 

I ZabeZ: FUNCTION U ... ) autUiibutu; 

1. labt,l is any legal identifier name, 
and constitutes the name of the 
function. 

.1 2 

2. 4, , A. are legal identifier neunes 

defining input parameters. If the 
entire parenthesized list is omitted, 
then the function has no input para- 
meters. 

3. ottAibatu defines the type of the func- 
tion, and, where applicable, its preci- 
sion. The form of cuttAibuf.u is the 
seune as used in data declarations 
(see Section 4.2). If no cuttxibutu are 
supplied, the function is assumed to 
be single precision scalar. 


BLOCK CLOSING 

Both procedure and function blocks are closed with 
the statement: 


I CLOSE labtl ; 

1. The identifier tabeZ is optional. 

2. If supplied, it must be the name 
of the procedure or function 
block. 
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Examples : 


ONE: PROCEDURE; 


procedure body 


single assign parameter ~ 
may be used to return values 
from procedure 

CLOSE; 


THREE: FUNCTION MATRIX (4, 4) DOUBLE; 



CLOSE THREE; 




FOUR: FUNCTION (ARG1,ARG2) BOOLEAN; 



two input parameters - 
for passing values into 
function only 


CLOSE; 


11-5 

INTERMETRICS INCORPORATpn • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02130 • (617) 66M840 

I 


I 





T 


! 


1 


T 


11.3 DECLARATION OF PARAMETERS AND LOCAL DATA 

Procedures and functions conunoniy require the use of 
locally-defined data. As with prog ram- level data, all 
data names must be declared before use by means of 
declaration statements. In addition, all input and 
assign parameters must appear in local declaration 
statements. 

Data and parameter declarations must be placed after 
the procedure or function opening statement, and 
before the first executable statement. It is good 
practice, and mandatory in some implementations*, to 
place parameter declarations before local data 
declarations. The forms of local data and parameter 
declarations are identical, and are as described in Section 4. 

Examples : 


General positioning - 

ONE: PROCEDURE (ARGl) ASSIGN (ARG2) ; 

parameter declarations 





CLOSE ONE; 


local data declarations 


executable statements 


* See the User's Manual for any given implementation. 
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Particular instance - 

parameters 
local data 

CiiOSE ONE; 


ONE: PROCEDURE (ARGl) ASSIGN (ARG2 ) ; 
DECLARE ARGl MATRIX(4,4); 

DECLARE ARG2 ARRAY (100) SCALAR DOUBLE 
DECLARE TEMP MATRI X ( 4 , 4 ) ; 



11.4 FUNCTION INVOCATIONS 

A function is invoked by the appearance of its neune 
as an operand in an expression. If the function is 
defined with input parameters, a list of arguments to 
be passed must follow the appearance of the name. The 
precise form of invocation is : 


1. tabtt is the defined name of the 
function. 

• 1 2 

2. 4 ,... is a list of arguments, 

which must correspond in number 
with the parameters of the function 
invoked. Each argument is a HAL/S 
expression. 

3. If the function has no pareuneters, 
then the entire parenthesized argu- 
ment list must be absent. 
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The transmission of the argument list during function 
invocation may be viewed as the assignment of the value 
of each expression in turn to its corresponding input 
parameter (although in any given implementation this 
may not actually be the mechanism of transmittal) . 

A set of rules governing type and precision conver- 
sion, and dimension matching similar to the assignment 
rules of Section 8 are applicable. These are classified 
below according to parameter type. 


MATRIX PARAMETER 


1. The corresponding argument must be 
of matrix type. 

2. The number of rows and columns of 
the argument must be the same as 
those of the parameter. 

3. Precision conversion is allowed. 


VECTOR PARAMETER 


1. The corresponding argument must be 
of vector type. 

2. The length of the vector argument 
must be the same as that of the 
parameter. 

3. Precision conversion is allowed. 
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INTEGER/SCALAR PARAMETER 


1. 

The following table gives the 
legal argument types: 


parameter 

argument 


INTEGER 1 
SCALAR • 

i INTEGER 
\ SCALAR 

2. 

Conversion 
place where 
to-inteqer 
rounding of 
expression. 

of the argument takes 
necessary. Scalar- 
conversion implies 
the value of the 

3. 

Precision conversion takes place 
when necessary and is applied 
after possible type conversion. 


CHARACTER PARAMETER 


1. The allowable argument types are 


given by the 

following table: 

parameter 

argument 


1 CHARACTER 
, INTEGER 
' SCALAR 

CHARACTER 


2. Rules for the conversion of integer 
or scalar values to character type 
are given in Appendix 
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Generally, the working leng^n of the parameter becomes 
equal to the length of the expression (after conversion, 
where applicable). However, if this would cause the 
declared maximum length of the parameter to be exceeded, 
truncation of the excess from the right takes place. 


BOOLEAN PARAMETER 


1. The corresponding argument must 
be of Boolean type. 


The following examples show a selection of both legal 
and illegal function invocations. 


Examples : 

Suppose the following functions are defined: 


ONE: FUNCTION INTEGER; 



CLOSE; 


{ TWO: FUNCTION (A, B) MATRIX (4, 4) DOUBLE; 
; DECLARE A MATRIX (4,4); 

I DECLARE B SCALAR; 
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Let also the following data be declared: 


DECLARE Ml MATRIX (4,4), 

M2 MATRIX (4, 4) DOUBLE, 
M3 MATRIX (3, 3) , 

S SCALAR, 

I INTEGER; 


Invocations of the above functions are illustrated 
in the following constructs: 


I S = S + ONE; 


< S 


S + M 


1, ONE' 


Note: subscripts may be 
■ nteger expressions of 
1 ny kind. 




M2 

M2 


’^40(M2,S) + M2; 
\ ■ 


TWO (M2, I) ; 

V 


M2 is converted to 
single precision 
during transmission. 

I is converted to 
scalar type during 
transmission. 
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The following are illegal invocations: 


I 

^ M2 
I 


I 

I M2 
I 

I 


TWO (M3, 1.5); row and column 

dimensions of M3 do 
not match those of 
parameter A. 



TWO (Ml , ' ARGUMENT ' 1 I I ) ; 



transmission of character 
type argument to scalar 
parameter B incurs an 
illegal type conversion. 


Argumerts may possess array- 
ness. The effects of this 
depend on whether or not 
the corresponding parameter 
is declared to be an array. 
See: (TBD) . 
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11.5 PROCEDURE INVOCATIONS 


A procedure is invoked by the use of a CALL statement, 
which may, in the case of a procedure with parameters, 
also specify the arguments to be passed. The precise 
form of invocation is: 


I CALL UbeZ . .) ASSIGN (a^,a^,. ; 

I 

1. labai is the defined name of the 
procedure. 

1 2 

2. i ,... is a list of input arguments 
which must correspond in number with 
the input parameters of the procedure 
invoked. Each input argument is a 
HAL/S expression. 

3. If the procedure has no input parameters, 
then the entire parenthesized argument 
list must be absent. 

1 2 

4. a ,a is a list of assign arguments 

which must correspond in number with 
the assign parameters of the procedure 
invoked. Each argument must be a HAL/S 
data item . 

5. If the procedure has no assign parameters, 
then the entire parenthesized list of 
assign arguments, and the ASSIGN 
keyword, must be absent. 
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The transmission of the input argument list during 
procedure invocation is identical in nature to func- 
tion argument list transmission. The related rules 
are given in Section 11.4. 

The transmission of the assign argument list follows 
stricter rules since values are passed both into and 
out of a procedure by this mechanism. 


ASSIGN ARGUMENTS 


1. An assign argument must be a 
declared HAL/S data item. 

2. An assign argument must match 
the corresponding assign para- 
meter in type and precision. 

3. A matrix or vector argument 
must match the corresponding 
parameter in dimension. 

4. Only matrix and vector arguments 
may be subscripted. Such sub- 
scripting must reduce the argu- ’ 
ment to scalar type by specifying • 
one element only. 


The following examples show a selection of both 
legal and illegal procedure invocations. 
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Examples : 


Suppose the following procedures are defined: 
, ONE: PROCEDURE; 



CLOSE; 


TWO: PROCEDURE (A, B) ASSIGN (C); 
DECLARE A MATRIX (3, 3); 
DECLARE B INTEGER; 

DECLARE C INTEGER; 



} CLOSE; 

Let also the following data be declared; 


DECLARE Ml MATRIX (3, 3), 

M2 MATRIX (3, 3) DOUBLE, 
M3 MATRIX(4,4) , 

S SCALAR, 

I INTEGER, 

ID INTEGER DOUBLE; 


Invocations of the above procedure are illustrated in 
the following constructs: 
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CALL ONE; 
CALL ONE (I) 


illegal: ONE possesses no 
parameters . 


CALL TWO(M2^,S+l) ASSIGN(I); 

^ values may be passed in 

and out of TWO through I. 

— type conversion required here. 

- precision conversion required 
here. 

' CALL TWO (M3, ID) ASSIGN(S); 

j A 1 4 

f > — type conversion illegal for 

assign arguments. 

' precision conversion required. 

dimension mismatch: pareuneter is 

a 3 X 3 matrix. 




\. 


CALL TWO (Ml, I) ASSIGN(I); 


appearance in both places 
is legal. 
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The last example introduces an interesting side effect 
which occurs when the same data item appears both as an 
input argument and as an assign argument. In the 
example, changing the value of assign parameter C 
during execution of the procedure may, depending on 
the i nplementation and the data type of I, result in 
a simultaneous change of input parameter B. The 
effect does not occur if type or precision conversion 
is required for transmission of the input argument. 

The side effect arises as a result of the actual 
mechanism used in argument transmission in particular 
implementations . 


Both input and assign 
arguments may possess 
arrayness, in which 
case the corresponding 
parameters must have 
an array declaration. 
See: (TBD) . 
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11.6 RETURNS FROM PROCEDURES AND FUNCTIONS 


When execution reaches the CLOSE statement of a procedure 
block, an automatic return to caller takes place. How- 
ever, if execution reaches the CLOSE statement of a 
function block, a run time error results since the 
function has no value to return to the caller. Hence 
a function block needs an explicit RETURN statement 
to cause the return to take place. In addition, if 
returns are required from parts of the code in a 
procedure block other than at the CLOSE, an explicit 
RETURN statement is required. 


PROCEDURE RETURN 

The RETURN statement of a procedure takes the form: 


I 

1 RETURN; 

t 


Example: 

j CHOICE: PROCEDURE (FLAG) ASSIGN (DIR) ; 
} DECLARE FLAG BOOLEAN; 

I DECLARE DIR VECTOR(3); 

I IF FLAG THEN RETURN; 

' DIR = UNIT (DIR) ; 

I CLOSE; 


If FLAG = TRUE then procedure merely returns execution 
at RETURN. If FLAG E FALSE then 3-vector DIR is 
normalized, and procedure returns execution at CLOSE. 


I 
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FUNCTION RETURN 


The RETURN Statement of a function takes the forir: 


I RETURN exp ; 

I 

1. The resultant value of the 

expression exp is returned when 
the function returns to its 
caller. 


The return of an expression by a function is similar 
in nature to the transmission of an input argument of 
a function to the corresponding parameter, the 
function itself playing the role of parameter. During 
return, type and precision conversions are possible, 
and dimension matching must be ensured. The relevant 
rules are the same as those described for argument 
transmission in Section 11.4. 


Examples : 


FUNCl; FUNCTION (A) SCALAR; 

DECLARE A MATRIX (3, 3) DOUBLE; 
DECLARE I INTEGER; 


RETURN 1+5; 


type conversion to scalar 
required. 


RETURN A. conversion to single 

. ' precision required. 


RETURN 'l='||l;-^ illegal type conversion 

: required. 


CLOSE; 
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11.7 


SUMMARY 


This section has explained the role of HAL/S procedures 
and functions: how they are defined; how they are invoked; 
and how execution is returned from them to the caller. 

The mechanism of argument passage has been described in 
detail. 

The next section introduces the concepts of sequential 
I/O in HAL/S, and describes statements for performing 
input/output operations. 
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12. INPUT/OUTPUT STATEMENTS 


Higher order languages possess I/O statements to provide 
progr2uns with a means of communicating with their environ- 
ment. In HAL/S, simple forms of I/O statement provide 
for the sequential input or output of data, including the 
generation of printed listings. 

This section first introduces the HAL/S concept of 
sequential I/O and then goes on to describe the construc- 
tion of I/O statements. 


12.1 HAL/S INPUT/OUTPUT CONCEPTS 

The form of sequential I/O statements in HAL/S is based 
on a specific conceptualization of the input-output process. 
In this conceptualization, I/O takes place through a number 
of "channels", each identified by an integer code. Each 
channel is connected to an "I/O device", of which there 
ar" two kinds, "unpaged", and "paged". 


UNPAGED DEVICES 

An "unpaged I/O device" can be used for both input and 
output. It can be visualized as consisting of a "device 
mechanism" which performs I/O on a continuous strip, across 
which data is written. The data is organized in "columns" 
across the strip, and in "lines" down it: 
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I 

I 


I 


The device mechanism moves from column to column along 
each line, and from line to line as it performs I/O. 
Hormally, the performance of I/O is accompanied by move- 
ment fr«n left to right across each line, and dovmwards 
from one line to the next. However, special positioning 
commands can modify this beh‘'vior. 
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On output, the strip continually lengtnens as new lines 
are written on the device. On input, the strip is of 
fixed length, and a run time error occurs if the device 
mechanism is requested to read off the lower end. 

Data output to an unpaged device is physically written 
so that it may, on some future occasion, be read in again 
via an unpaged device. 


PAGED DEVICES 


A "paged I/O device" can only be used for output. It can 
be visualized in much the same way au an unpaged device, 
except that the lines of data are organized into "pages": 


first columns of 



lines of data 


device mechanism 
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The paged device is designed to generate printed listings. 
The form in which data is ohysically written on the device 
is different from that on an unpaged device. Such data 
cannot normally be read back again via an unpaged device. 


DAT<\ STORAGE 

Data is conceived as being "stored" on a device, even 
though in physical reality the device may be a line printer, 
the data becoming inaccessible to t^e computer. 

In HAL/S, data is written on the I/O device in "fields" which 
can be separated by blcink columns, or by a separator character. 
The I/O process is stream-oriented: within the confines of 

a single I/O statement, the column and line alignment of data 
fields need be of nc consequence. Data fields may even be 
broken over line or page boundaries. 


12.2 THE STATEMENT 

The WRITE -.»r>jnt is an executable statement for the 
output of data to a paged or unpaged I/O device. The form 
of the WRITE statement is as follows: 


I WRITE (n) cxp^ , CKp^ , ... exp*'; 

1. n is the channel code number, and 
lies in the range 0 ^ n $ 9*. 

2. Each etp is a HAL/S expression whose 
value or values are to be written on the 
device. The list of expressions may be 
arbitrarily long. Alternatively, none 
need he supplied. 

3. Each expression in turn from left to 
right is evaluated, and its value (or 
values) written on the specified device. 


* This value may be implementation dependent. See Appendix 
for exceptions. 
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In execution, the sequence of events is as follows: 

• If the WRITE statement is the first to be executed 
for the specified device, the device mechanism 
positions itself at column 1 of line 1 (on page 1 
if the device is paged) . Otherwise, the device 
mechanism moves down one line from its current 
position, and repositions itself at column 1. 

• Data fields are written from left to right along the 
line, each field being separated from the next by 

5 blanks*. 

• When the end of a line is reached, the device 
mechanism moves to column 1 of the next line and 
continues writing data fields. Unless the data 
field is of character type, the device does not 
attempt to break it over a line boundary if there 
is not room for it at the end of a line. Instead, 
it begins writing it on the next lire. 

• After finishing execution, the device mechanism is 
left positioned one column to the right of the end of 
th last data field written. Alternatively, if the 
dar^ field abuts the end of a line, it is positioned 
at -olumn 1 of the next line. 

• If no expressions are supplied in the WRITE statement, 
the device merely performs its initial positioning. 


* This value may be implementation dependent. Some 

implementations ma^ allow the user to vary the value by 
a run-time option. 
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DATA FORMATS 


The format of a data field depends on the type of 
expression whose resultant value is being written on 
the device, and on whether or not the device is paged. 

The formats are, in general, implementation dependent. 
Typical formats are shown in Appendix _. 

Uni-valued expressions each give rise to a single data 
field. Multi-valued expressions each give rise to a 
series of data fields, which are written on the device 
sequentially in the following way: 

^ a f-vector expression yields I scalar data fields, 
one for each element. The data fields are laid out 
along a line, separated from each other by the standard 
number of blanks, and overflowing onto succeeding lines 
as required. 

• an m x n matrix expression yields m.n scalar data fields, 
one for each element. The matrix is laid out row by row. 
Each row is written as if it were an n-vector. The first 
element of the second and subsequent rows begin a new 
line, vertically aligned under the first element of the 
first row. 

• arrays are written array element by array element, 
completing the requirements for one element before 
going on to the next. The last data field of one 
array element is separated from the first data field 

■ the next element by the standard number of blanks, 

,c starting a new line if required. 


Examples : 


M be a 

3x3 matrix 

with M E 

0.5 

1.5 

0.0 




2.5 

1.0 

1.0 




0.5 

0.1 

10.1 

I be a 

3-array of 

integers 





with I = (4 6 -2) 

C be a character with C h 'VALUE' 

B be a Boolean with B e TRUE 

then 

I 

I WRITE (6) C,M,I; 

I V RITE (6) B; 

would result in output of the following form: 
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paged output: [132 columns/line] 



unpaged output: [80 columns/line] 


INITIAL POSITION 



OF DEVICE MECHAI4ISM 


NOTES : 


single precision scalar data fields are a fixed 14 columns 
wide. 


single precision 
wide. 


integer data fields are a fixed 11 columns 
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12.3 THE READ STATEMENT 


The READ statement is an executable statement for the 
input of data from an unpaged I/O device. The form of 
the READ statement is as follows: 


I READ(n) , ... 

I 

1. n is the channel code number, and 
lies in the range 0 ^ n ^ 9*. 

2. Each var is any type of data item, 
either subscripted or unsubscripted. 
The list of items may be arbitrarily 
long. Alternatively, none need be 
supplied. 

3. The specified device reads values 
into each data item in turn from 
left to right. 


In execution, the sequence of events is as follows: 

• If the READ statement is the first to be executed 

for the specified device, the device mechanism positions 
itself at column 1 of line 1. Otherwise, the device 
mechanism moves down one line from its current position 
and repositions itself at column 1. 

• Data fields are read from left to right along the line. 
The device expects each data field to be separated from 
the next by a comma and/or at least one blank. 

• When the end of a line is reached, the device mechanism 
moves to column 1 of the next line and continues reading. 
Data fields may be broken over the line boundary. 


^ This value may be implementation depei\dent. See 
Appendix _ for exceptions. 
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• After finishing execution, the device mechanism 
is left positioned one column to the right of the 
end of the last data field read in. Alternatively, 
if the data field abuts the end of a line, it is 
positioned at column 1 of the next line. 

• If no list of data items is supplied in the READ 
statement, the device merely performs its initial 
positioning. 

• If the device reads two consecutive separating 
commas, then the value of the data item which would 
have been changed by reading a data f.’eld between 
the commas, is instead left untouched. 


DATA FORMATS 

The formats of data fields expected by a device on input 
depend on the type of data item being read into. The 
formats are, in general, implementation dependent. Typical 
formats are shown in Appendix _. 

Uni-valued data items cause single data fields to be read. 
Mulfi-valued data items cause a series of data fields to be 
read sequentially. 

• A vector data item causes one data field per vector 
element to be read. 

• A matrix data items causes one data field per matrix 
element to be read. Values are read into the matrix 
row by row . 

• Arrayed data items are read into array element by 
array element, completing the read requirements for 
each element before going on to the next. 
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Examples : 


Let M be a 3x3 matrix with initial values given 


by M s 

0.5 

1.5 

0.0 

2.5 

1.0 

1.0 


0.5 

0.1 

10.0 


Let I ' a 3-array of integers, 

C be a character data item of maximum length 10, 
B be a Boolean. 


Then 

I 

I READ(5) M,I,C; 
; READ (5) B; 



INITIAL POSITION 
OF DEVICE MECHANISM 


FINAL POSITION 
OF DEVICE 
MECHAT^ISM 


would result in: 

this value not changed 
by READ statement. 

I = (-4 -5 1) 

C = 'GOODBYE' 

B = TRUE 


M 


0.1 0.0 

0.0 0.1 

0.0 0.0 


0.0 

0.0 

0.1 
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12.4 


INPUT/OUTPUT FORMATTING 


The formatting of I/O embraces two separate concepts; 

• the shape of data fields; 

• the position of data fields. 

In terms of input, formatting implies that a device can 
be made to recognize different shapes of data fields in 
a variety of positions. In terms of output, formatting 
implies that a device can generate different shapes of 
data fields in a variety of positions. 

Data field positioning is effected by direct movement 
of the device mechanism. Commands in the form of pseudo- 
functions can be inserted into READ and WRITE statements 
to cause repositioning of the mechanism. 

There is no direct capability in a READ or WRITE statement 
for defining different data field shapes. It should be 
noted however, that for outuput, the equivalent of arbitrary 
data field shaping can be achieved by using HAL/S 's 
character string handling features. 


There exists a second type 
of input statement called 
the READALL statement , 
which can be used to input 
arbitrary strings of 
characters. This can form 
the basis for arbitrary 
data field shape recogni- 
tion on input. 

See: (tbd) 
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DEVICE MECHANISM POSITIONING 


HAL/S possesser five pseudo-functions which can reposition 
a device mechcinism during execution cf a READ or WRITE 
statement. The pseudo-functions are placed in the READ 
or WRITE statement as if they were normal data items or 
expressions. 

Three basic rules underlie the operation of the pseudo- 
functions in positioning device mechanisms: 

• Horizontal and vertical positioning are separately and 
independently controlled. 

• The operations of the pseudo-functions are independent 
of whether a device is being used for input or output. 

• An explicit repositioning command taking effect at a 
particular point in execution overrides the default 
movement in the same direction (horizontal or vertical) 
which would otherwise be made by the device mechanism. 

Particular instances of these rules are noted as the 
device positioning pseudo-functions are described below. 


HORIZONTAL POSITIONING 

The two f)seudo-functions TAB and COLUMN serve to position 
a device mechanism horizontally on a line. Their form is 
as follows: 


12-12 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE MASSACHUSETTS 02138 • (617) 66M84 



1 


TAB (a) 

COLUMN (B) 

1. a and B are integer expressions. 

2. TAB (a) moves the device mechanism 
left or right by the number of 
columns specified by a. Negative 
values of a denote movement to the 
left; positive values, movement to 
the right. 

3. COLUMN (B) moves the device mechanism 
left or right to the column indicated 
by 6. 

4. Values of a or B must not be sucn as to 
try to move the device mechanism left 
past column 1, or right past the right- 
most column*. 


If a TAB or COLUMN pseudo-f unctio:. appears at the 
beginning of a READ or WRITE statement, it overrides the 
default positioning at column 1. 

It does not of itself inhibit movement onto the next 
line. 

If a TAB or COLUMN appears between two expressions in 
a WRITE statement, it overrides the standard data field 
separation . 

Successiva TABs are cumulative in action. 


^ The number of columns on any device (i.e. the logical 
record length) is assumed constant but implementation 
dependent. Its possible values may be found in the 
User's Manual for the implementation. 
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Example : 

If Cl, C2, C3 are character data items 

with Cl S 'FIRST' 

C2 i 'SECOND' 

C3 = 'THIRD' 

and xf channel 6 is a paged device 

then 

I 

1 WRITE(6) TAB(-50) ,Cl,COLUMN(5) ,C2,C3,TAB(2) ; 

I 

produces output of the following form; 



INITIAL 
POSITION OF 
DEVICE MECHA.NISM 


TAB LEFT 50 
COLOUMNS, MO\,-E 
DOWN 1 LINE 
BY DEFAULT 
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VERTICAL POSITIONING 

The three pseudo-functions SKIP, PAGE, and LINE serve to 
position a device mechanism vertically. PAGE can only be 
used in I/O via a paged device; the behaviour of LINE is 
different dependi.ig on whether a device is paged or unpaged. 

The form of the three pseudo-functions is as follows: 


SKIP (a) 

PAGE (6) 

LINE (y) 

1. a, B/ and y are integer expressions. 

2. SKIP (a) moves the device mechanism 
downward by the number of lines speci- 
fied by a. The value of a may be zero, 
in which case SKIP can suppress a de- 
fault line advancement. However, a 
may not be negative i indicating up- 
wards movement) . SKIPs over page 
boundaries are allowed. 

3. PAGE(B) moves the device mechanism 
downward by the number of pages 
specified by B. As in SKIP, B may not 
be negative in value. The relative 
line number remains unchanged . 

4. For unpaged devices, LINE('^) positions 
the device mechanism at line y. The 
value of r" must not be such as to cause 
upwards movement of the device mechanism. 

5. For paged devices, LINE(y) has a different 
behaviour. Let the device mechanism be on 
lino I prior to execution of LINE(y). If 

I < then the device mechanism moves to 
line (' f. the next page. If y > I then the 
device echanism moves to line y on the cur- 
rent p The value of y must lie in the 

range 1 y L, where L is the number of 
lines per page*. 


^ The numbe r of lines pp i page is im.plemeatation dependent. 

Its value may be founa in the User's Manual for a given 
implementation. 
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If a SKIP, LINE, or PAGE pseudo-function appears at the 
beginning of a READ or WRITE statement, it overrides the 
default downward movement of one line. 

SKIP, LINE and PAGE pseudo-functions do not of themselves 
inhibit the default horizontal movement to column 1. Neither 
does their appearance between two expressions in a WRITE state- 
ment affect the standard data field «eparaLion. 

Successive SKIPs and PAGES are cumulative in effect. 

Examples: 

If Cl, C2, C3 are character data items 

with Cl 2 'FIRST' 

C2 H 'SECOND' 

C3 “ 'THIRD' 

and if channel 6 is a paged device 

then 

I 

J WRITE(6) SKIP (0) ,C1,LINE(1) ,C2,C3; 
produces output of the following form: 
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Note: If channel 6 were unpaged, the WRITE statement 

would be illegal since it would be calling 
for an upwards movement from line 40 to line 1. 


Further, 

I 

I WRITE(6) C1,PAGE(1) ,C2; 

I 

produces the output of the form: 



POSITION 0! JEVICE 
KElHAMISM 
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12.5 DEVICE ATTRIBUTES 

In HAL/S, devices have been charac-terized as either paged 
or unpaged. In tne absence of any specific direction on 
the part of a user, the following rules determine whether 
a device being used is paged or unpaged. 

• If only WRITE statements appear in a compilation 
for a given channel, t.ier. the device on that channel 
will be paged. 

• If only READ statements appear, or if both READ ,nd 
WRITE statements appe£._* tar a giver channel, then 
the device on that channel will bf! unpaged. 

The use* may specifically direct certain channels to be 
paged or unpaged, overriding these rules’ . 


^ See the User's Manual for a given implementation. 
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12.6 SUMMARY 


S ction 12 .f the Guide has described in detail the 
H/Jj/S constructs concerning sequential I/O, and has 
di'.cussed the results of using different kinds of READ 
ana WRITE statements. Section 13 introduces the user 
to the basic concepts involved in real time programming 
using HAL/S. 


HAL/S contains a FILE 
statement by which random- 
access I/O may be effected. 
See: (tbd) 
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13. REAL TIME FEATURES OF HAL/' 


So far the Guide has made no reference to the dynamic 
properties of HAL/S programs. Clearly, any program will 
take a finite time to execute but none of the constructs 
hitherto described depend on any sense of time for their 
operation . 

However, the HAL/S language does contain constructs which 
depend on a sense of time for their operation. This is 
what is meant by the statement that HAL/S is a "real time 
programming language". In other words, HAL/S programs 
can be written which, when executed, cause operations to 
be carried out at desired points or during desired inter- 
vals in "real time". 

In some implementations of HAL/S, "real time" may be just 
what the phrase implies, real clock time. In others, the 
"real time" may be simulated in some way by the operating 
environment of a HAL/S program: in this case, it can be 
referred to as "pseudo-real time". 

This section of the Guide explains the basic HAL/S concepts 
of real time programming, and describes some of the more 
elementary real time programming language forms. 


13.1 HAL/S REAL TIME COHCEPTS 

The true HAL/S concept of a program at run time is an 
entity executing over some interval in "real time", 
diructed and c.^ntrolled by a Real Time Executive (RTB) . 
At the outset, the RTE begins execution of the program. 
When program execution is completed, control is returned 
to the RTE. In HAL/S terminology, the dynamic counter- 
part of the Fitatic program block, which is executing 
under RTE control, is called a "real time process". 
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MULTI-PROCESSING IN HAL/S 

Multi-processing is the simultaneous handling of more 
than one "real time process". With most present-day 
machines, "simultaneous" really means interleaved , 
because most machines can at one time only support the 
execution of a single machine instruction sequence. 

However, this distinction has no significance at the 
higher level of the HAL/S language. 

The FvTE of HAL/S can simultaneously handle an arbitrary* 
number of processes created by the user. A number is 
attached by the user to each process, called its “priority". 
The RTE maintains processes in a "process queue" ordered 
by priority, and always endeavors to execute the processes 
in order of priority, highest first. 

The HAL/S program itself, beginning execution under the 
RTE, constitutes the first or "primal process". All other 
processes are brought into existence by the execution 
of SCHEDULE statements coded into the program. Just as 
the primal process has a static counterpart, which is 
the program block coded by the user, so must the other 
processes have their static counterparts. These are 
so-called task blocks, which are coded inside the program 
block in a very similar wav to procedure blocks. Each 
time a task block is invoked by execution of a SCHEDULE 
statement, a new process is created and queued by the 
RTE. 


See the User's Manual for the maximum number supported 
in any given implementation. 
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A number of programs, indepen- 
dently compiled, can be brought 
together at run time. One 
of them is chosen by the user 
to start execution as the 
primal process • Processes 
can be generated from the 
others by invoking them with 
the same form of SCHEDULE state-* 
ment. Any of the programs are 
allowed to contain task blocks 
for which more processes in turn 
can be created. 

See; (TBD) . 
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STATES OF A PROCESS 


It is now possible to represent the behavior of the 
RTE by a more formal description of the possible 
states* in which a process can exist. This in turn 
will introduce other HAL/S constructs for controlling 
the activities of the RTE. 

A process can be in either of the following two major 
states at a given time: 

• ACTIVE STATE: a process is in an active state 

when it exists in the RTE's process queue. 

The state actually comprises three substates 
or minor states in any one of which an active 
process may be at a given time. 

• INACTIVE STATE: a process is defined for 

completeness as being in the inactive state 
if it does not exist in the process queue. 

The minor states of an active process are as follows: 

• EXECUTING: an active process is "executing" 

when it has actually been put into execution 

by the RTE, operating on the priority principle 
already described. The number of processes which 
can be in this state simultaneously is implementa- 
tion dependent**. 


* The states to be defined do not correspond one-to-one 

with the RTE states described in the Language Specification 
document. The latter are defined for the convenience of 
the formal description of language constructs. The former 
are defined with user convenience in mind. 

** In most implementations it is likely to be 1, but see 
the User's Manual for a given implementation. 
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• READY: an active process is "ready" if it 

is available for execution, but higher priority 
processes in execution are currently barring it. 
The occurrence of a process first entering the 
ready state will be called its "initiation". 

• WAITING: an active process is "waiting" if it 

is neither ready nor executing. Some condition 
set up by the user prevents it being available 
for execution by the RTE. 


When a process is created by invoking a task block by a 
SCHEDULE statement, it makes a transition from the inactive 
state to an active state. It is entered into the process 
queue in ei+’her the ready or the waiting state, depending 
on the form of the SCHEDULE statement. If it is entered in 
the ready state, then depending on its priority, it may 
immediately be elevated to the executing state. 

A process is caused to make a transition from an active 
state to the inactive state (or removed from the process 
queue) by a TERMINATE statement. The process is said 
to have been "terminated". 

The priority of an active process may be changed by an 
UPDATE PRIORITY statement. 

A process may be forced into the waiting state by execution 
of a WAIT statement. 

The statements outlined above are among the real time 
programming language forms to be described later in this 
section. 


PROCESS SWAPPING & BREAKPOINTS 

A process swap is a pair of state transitions in which 
one process leaves the executing state, and a second enters 
it from the ready state. The process swap may occur because 
the first process has been forced into the inactive state 
or the waiting state, or because the second process has a 
higher priority than the first. 
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The HAL/S language itself makes no assumptions on where 
process swapping can occur. However, most implementations , 
depending on the object machine characteristics, limit 
process swapping to given places in the HAL/S code 
sequences under execution by the RTE. These places are 
called "breakpoints". The determination of breakpoints 
is a function of the HAL/S compiler for a given implement 
tation, and no language construct exists to modify their 
existence*. 

The effect of breakpoints is to superimpose a kind of time 
granularity on the operation of the RTE. 


PRIORITY SCALES 

The number specifying the priority P of a process is 
an integer in the range; 

0 ^ P < 255** 

The primal process is assigned a priority of 50** by 
the RTE on beginning execution. 


* As an example, in the HAL/S-360 implementation, break-* 
points occur at the end of every executable statement. 

** These values are, however, implementation dependent. 
See Appendix for exceptions. 


I 

13-6 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 66M 840 . i 



1 


PROCESS DEPENDENCY 

Suppose that there are two processes, A and B, and 
that A creates process B during the course of its 
execution. At the time of creation, B may be specified 
to be either "dependent" on or "independent" of A. 

If B is dependent, it means that it depends for its 
existence on the existence of A. If B is independent, 
then A may cease to exist without affecting B's existence. 

However, an overriding rule is that all other processes 
are always dependent on the primal process for their 
existence. 

The consequences of dependency will be seen when the 
flow of execution through program and task blocks is 
described in Section 13.3, and again when the TERMINATE 
statement in introduced in Section 13.5. 


13.2 TASK BLOCK DEFINITIONS 

A task block is a static block of code interior to a 
progrcim, from whence processes can be created by means 
of the SCHEDULE statement. Task blocks may only be 
defined at the program level, and not nested inside 
procedure or function blocks defined in a program. This 
is illustrated as follows: 
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Program 


Task Block 


Procedure Block 


Nested Function 
Block 



Region where Task 
Blocks are legal 
and may be nested, 
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Task block definitions are similar to program block 
definitions as described in Section 3, and have similar 
opening and closing statements. 


RELATIVE POSITION OF TASK DEFINITIONS 

Statements invoking a task block should normally follow 
its block definition. 


This rule is not absolute - 
it can be circumvented by 
the use of a task declara- 
tion statement. 

See: (TBO) . 
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TASK OPENING 


The statement opening a task block takes the form: 


I 

1 label iThSK; 

1. label is any legal identifier 
name, and constitutes the name 
of the task block. 


TASK CLOSING 

The statement closing a task block takes the form: 


} CLOSE label; 

I 

1. The identifier label is optional. 

2. If supplied, it must be the name 
of the task block. 


Example : 


DISPLAY: TASK; 


task body 


CLOSE DISPLAY; 
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LOCAL DATA DECLARATIONS 


Local data can be declared in a task block in exactly 
the same way as it is declared in a procedure or 
function block. The declarations appear c.iiter the 
task opening statement, and before the first executable 
statement of the block. The forms of the declarations 
have been described in Section 4. 


Examples ; 


general positioning - 


DISPLAY; TASK; 



local data decla'^itions 



CLOSE DISPLAY; 


executable statements 
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particular instance - 


! 


I 

I 

I 




DISPLAY; TASK; 

DECLARE S CHARACTER (10) , 
I INTEGER; 


CLOSE DISPLAY; 


local data 


li.i FLOW OF EXECUTION IN PROGRAM S TASK BLOCKS 


The flow of execution through progreun and task blocks 
is subject to a new interpretation, based on the 
concepts of real time programming introduced in this 
section. Programs and tasks are treated together since 
their representations at run time are in both cases 
real time processes. 

Execution of a process begins with the first executable 
statement in the corresponding static program or task 
block. It continues, and if not terminated by some 
other process, ends in one of the following ways: 

• by execution of a TERMINATE statement 
terminating itself; 

• by reaching the CLOSE statement of the 
block; 

• by execution of a RETURN statement in 
the block. 

If execution ends by self^termination, the process goes 
into the inactive state and is removed froi>. thv> . x.-}ce88 
queue. All dependents of the process are trext.. . i.xewlse. 

If execution ends on a CLOSE or RETURN statement, the 
process goes into the inactive state directly only if 
it has no dependents. Otherwise, it goes into a waiting 
state until the dependents have in their turn terminated. 
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FORM OF RETURN STATEMENT 


The form of RETURN statement for programs and tasks 
is the same as for procedures: 


• RETURN; 

I 

t 


13. THE SCHEDULE STATEMENT 


The SCHEDULE statement is an executable statement causing 
a new process to be placed in the process queue. The 
SCHEDULE statement specifies a task block from which 
the process is to be created, and the priority which 
it is to be given. A condition for the initiation of 
the process can be supplied. 

Only one process derived from a given task block may 
be active at any given time. 

The form of the SCHEDULE statement varies, depending on 
whether it specifies immediate, or delayed initiation 
(transition to the ready state) . 


IMMEDIATE INITIATION 

The following variant of the SCHEDULE statement is the 
simplest. It causes the creation of a process which 
is placed in the process queue in the ready state. The 
process is thus available for execution immediately. 
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{SCHEDULE £afacX PRIORITY (a) DEPENDENT; 

1. A process is created from the task 
block labzZ and placed in the process 
queue in the ready state. The 
process created is also known by 
the name iabeX. 

2. a is an integer expression specifying 
the priority of the newly-created 
process. It must lie in the legal 
range for a given implementation. 

3. The keyword DEPENDENT is optional. 

Its presence denotes the dependency 
of the process created on the 
process executing the SCHEDULE 
statement. In its absence, the 
processes are independent. 


Examples : 


SCHEDULE DISPLAY PRIORITY (100) DEPENDENT; 
SCHEDULE RECOVER PRIORITY (255) ; 
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DELAYED INITIATION 

The following form of the SCHEDULE statement causes 
a process to be placed in the process queue in the 
waiting state. The process is transferred to the ready 
state on a specified time criterion being met. There 
are two variants, each with a different time criterion. 


• INITIATION after some duration. 


. SCHEDULE fabei IN inteAval PRIORITY (a) DEPENDENT; 

I 

1. A process called -fcabe£ is created from the 
corresponding task block and placed in the 
process queue in the waiting state. 

2. PRIORITY (a) and DEPENDENT have the same 
meanings as described in the previous 
form of SCHEDULE statement. 

3. The phrase IN IntzAvaZ indicates that the 
process is to be put in the ready state 
after a specified int.irval in the waiting 
state. inteAvat is a scalar expression whose 
value specifies the duration in seconds. 

4. If the value is negative or zero, the 
process is put in the ready state immediately. 
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• INITIATION at a given time. 


I SCHEDULE tabeJi AT time PRIORITY (a) DEPENDENT; 

1. A process called tabtt is created from 
the corresponding task block, and placed 
in the process queue in the waiting state. 

2. PRIORITY (a) and DEPENDENT have the same 
meanings as described in the previous 
forms of SCHEDULE statement. 

3. The phrase AT -time indicates that the 
process is to be put in the ready state 
at a specified real time, time is a 
scalar expression whose value specifies 
the time in seconds.* 

4. If the indicated time is in the past, 
the process is placed in the ready state 
immediately. 


* The real time origin is not specified by the language. 
The origin is normally coincident with the initiation 
of the primal process. Some implementations allow 
its value to be preset at run time. See the User's 
Manual for a given implementation. 
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Examples : 


SCHEDULE ALPHA AT 1.25E4 PRIORITY (1+5) ; 
SCHEDULE BETA IN S+15.5 PRIORITY (20) ; 


SCHEDULE statements can also 
specify the cyclic execution 
of a process until a stopping 
criterion is met. An explicit 
specification of the interval 
between cycles can also be 
given. 

See; (TBD) . 
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13.5 OTHER REAL TIME FEATURES OF HAL/S 

Three other real time programming statements which 
have already been mentioned are now described. These 
are the TERMINATE, WAIT, and UPDATE PRIORITY statements. 
Certain other useful constructs are also introduced. 


TERMINATE STATEMENT 

A process is forced to the inactive state (removed from 
the process queue) by means of the TERMINATE statement. 
Its form is shown below; 


1 

j TERMINATE Idbtt ; 

1. The appearance of labzZ is optional. 
If present, the statement terminates 
an active process called labti . 

ie. . If labeZ is absent, then the process 
executing the TERMINATE statement is 
terminating itself. 


In order to make independent processes truly independent, 
HAL/S places an added restriction on the operation of 
the TERMINATE statement. A process is only allowed to 
use it to terminate itself or its dependents . 

Note that when a process is terminated by execution of 
a TERMINATE statement, all its dependents are automatically 
terminated at the same time. 


13-18 

INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE. MASSACHUSETTS 02138 • (617) 661-1840 



Examples ; 


TERMINATE; self termination 

TERMINATE BETA; termination of dependent 


If a number of processes are to be terminated 
simultaneously, the TERMINATE statement can 
specify a list of process names: 

I TERMINATE ALPHA, BETA, GAMMA; 

1 

WAIT STATEMENT 

The WAIT statement is used to force the process executing 
it into a waiting state until some condition is met, where- 
upon it returns to the ready state. Three forms, each 
with a different condition, are described below. 

• WAIT for a duration. 


I WAIT inteAVdi ; 

I 

1. The statement indicates that the 
process is to be placed in the 
waiting state for a specified 
duration. 

2. inteAval is e scalar expression 
specifying the duration in seconds. 

3. A negative or zero value results in 
the process not leaving the ready 
state. 
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• WAIT until some time. 


1 ^ 

j WAIT UNTIL tone ; 

1. The statement indicates that 
the process is to be placed 
in the waiting state until 
some given time. 

2. timz is a scalar expression 
specifying the time of return 
to the ready state, in seconds*. 

3. Specification of a time in the 
past results in the process not 
leaving the ready state. 


• WAIT for dependents . 


} WAIT FOR DEPENDENT; 

I 

1, The statement indicates that the 
process is to be placed in the 
waiting state until all its 
dependent processes have termin- 
ated. 

2. If there are no dependents, the 
statement has no effect. 


Examples: 

I 

I WAIT UNTIL DELTA_T+15E2; 
I WAIT S/2; 

I WAIT FOR DEPENDENT; 


* See the discussion on the SCHEDULE statement in 
Section 13.4 for a footnote remarking on the real 
time origin. 


» 
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UPDATE PRIORITY STATEMENT 


The UPDATE PRIORITY statement is used to change the 
priority of an active process. Its form is: 


} UPDATE PRIORITY label TO a; 

1. The process whose priority is to 
be changed is specified by label. 

2. The name label is optxonal. If 
omitted, the process executing 
the statement is indicated. 

3. a is an integer expression whose 
value indicates the new priority 
value to be assigned. 


Examples : 


UPDATE PRIORITY TO 16; 

UPDATE PRIORITY ALPHA TO 1+20; 


Since the RTE operates on a basis of priority, apparently 
a user could control the execution of a desired set of 
processes by manipulating their relative priorities. 
Although this is entirely possible, it is not reccxnmended 
since the behavior of such a priority-driven scheme would 
depend on how many processes an RTE could bring into the 
executing state simultaneously, which is an implementation- 
dependent figure. 
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REAL TIME BUILT-IN FUNCTIONS 


Two built-in or library functions are of utility 
in constructing real time programs: 


Function 

Comments 

RUNTIME 

returns the current 
value of real time as 
a scalar, in seconds. 

PRIO 

returns the priority 
of the process in- 
voking the function 
as an integer. 


MAJOR STATE INDICATION 

There exists a way of finding out whether the current 
state of any process is either active or inactive (i.e. 
whether or not it exists). 

The name of the process can be used as if it were a 
Boolean variable. The following tables shows the 
correspondence between state and truth value. 


State 

Value 

ACTIVE 

INACTIVE 

TRUE 

FALSE 


Example : 

to write a message if a process ALPHA exists - 
I IF ALPHA THEN WRITE (6) 'ALPHA IS ACTIVE'; 
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13,6 A SIMPLE REAL TIME PROGRAM 

The utility and importance of the constructs defined 
in this section can only be properly understood by 
presenting an actual example of a real time program. 

The following example is given in the form of a problem 
and its solution. 


PROBLEM 

The problem is to write a program which, when run on a 
computer facility with remote interactive terminals, 
will aid users in electronic circuit design (to take 
an arbitrary example) . A user begins each design 
session by logging onto the facility at a terminal, and 
invoking execu‘’ion of the circuit design program. 

The program is to be set up so that, at the outset, the 
user may specify the desired duration of his session. 

The program is then to interrupt the user's calculations 
every 10 minutes and remind him how much time he has 
used. At the expiration of the specified session duration, 
the program is to allow the user 10 minutes more and then 
terminate the session. 


SOLUTION 

Only the overall features of the program from the real 
time programming standpoint are illustrated here. The 
actual circuit design algorithms are of no consequence. 

Execution of the circuit design program implies the 
existence of three real time processes. 

• a SUPERVISOR process controlling the two 
others, whicn determines the session dura- 
tion, and makes arrangements to terminate 
the session at its expiration. Most of the 
time this process will be in the waiting state. 
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• a TIMER process which informs the user how 
much time he has used every 10 minutes. This 
process is also mostly in the waiting state, 
temporarily being in execution every 10 minutes. 

• a CALCULATOR process which actually interacts 
with the user in his design session. This 
process is executing most or all of the time. 

The following diagram summarizes the activities of the 
three processes. 


START 
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Clearly, In order for TIMER to interrupt CALCULATOR reliably 
every 10 minutes, it must have a higher priority than 
CALCULATOR. Likewise, SUPERVISOR should be of higher 
priority than CALCULATOR. The relative priorities of 
SUPERVISOR and TIMER do not matter since TIME is mostly 
in the waiting state anyway. The table below shows 
suitable priorities for each of the three processes. 


process 

priority 

SUPERVISOR 

50 

TIMER 

50 

CALCULATOR 

25 
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The HAL/S program corresponding to these processes 
is as shown below: 


SUPERVISOR: PROGRAM 
DECLARE S SCALAR 



SUPEW/ISOR will be the 
primal process, initiated 
by the RTE at time 0.0 
with priority 50. 


TIMER: TASK; ^ 

DO WHILE TRUE; 

WAIT 600; 

WRITE (6) 'YOU HAVE USED 

END; _____ 

CLOSE TIMER; 


'•TIMER task b,.ock 


' I I runtime/ 60 1 i ’ MINS . ' ; 

~ •infinite loop: wait 600 
seconds and signal time 
used 


CALCULATOR; TASK; 


-♦ CALCULATOR task block 



design algorithms 


CLOSE CALCULATOR; 


^ first executable state- 
ment of progrm 

WRITE(6) 'TYPE SESSION DURATION IN MINS.'; 


READ(5) S; -a 

SCHEDULE TIMER PRIORITY (50) ; 
SCHEDULE CALCULATOR PRIORITY (25) ; 
WAIT S 60; -e 



WAXi. O ou; ' ■ - N. tJU- 

WRITE(6) 'TIME UP-10 MINS. MORE ALLOWED* . 

WAIT 600; 

WRITE (6) 'END OF SESSION'; 

TERMINATE; 

CLOSE SUPERVISOR; 


^ determine session 
duration 

Schedule TIMER & 
CALCULATOR processes 


Wait for session 
duration 


allow 10 minutes 
more 


) signal end of 
session & terminate 
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13.7 SUmARY 

Section i3 has introduced the HAL/S concepts of real 
time and described constructs for the creation of real 
time programs, A concluding example shows how the 
constructs can be combined to perform useful functions 
in real time. 

Section 13 completes Part I of the Programmer’s Guide. 


The constructs described 
above enable real time 
processes to be manipu-^ 
lated according to time 
criteria. Other constructs 
enable their manipulation 
according to “event'* cri- 
teria. HAL/S **events** are 
Boolean-like data types 
whose values are accessible 
to the RTE, Their values 
Ccin be set by the user, 
thus indirectly controlling 
the real time process 
states. 

See: (TBD) . 

The problem of controlling 
the sharing of data by two 
or more processes is also 
important. 

Ser^i (TBD). 


k 
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1^1. SUMMARY OF PART I 


Part I of the Programmer's Guide has presented a wide 
variety of the simpler constructs of the HAL/S language. 

It has laid sufficient ground work for the understanding 
of more complex language forms which are to be presented 
in Part II. 

_ low is summarized the material which has been presented 
i. Part I. 

SECTION 1 described, on a conceptual level, the nested 
block structure typical of HAL/S programs, and 
explained how globally and locally visible data 
could be declared. It also introduced the concept 
of nested groups of statements. The desirability 
of these hierarchical forms was expressed from the 
structured programming viewpoint. 

SECTION 2 began describing the HAL/S language on the 

most fundamental level by specifying its character 
set; by explaining the forms of reserved words, 
identifiers and literals; and by introducing the 
format in which HAL/S source text is written. 

SECTION 3 dealt with the HAL/S program as the basic 
unit of compilation. The delimiting statements 
of a program were defined and the positions within 
it of data declarations and executable statements 
described. The flow of execution within a program 
was pointed out. 

SECTION 4 began defining the contents of HAL/S programs 
in more detail by presenting the various forms of 
declaration statements by which data could Lo defined. 
Ways of initializing this data were also described. 
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SECTION 5 turned aside from the discussion of HAL/S 
data by defining the form of REPLACE statements, 
by which symbolic HAL/S text substitutions could 
be made. 

SECTION 6 returned to the discussion of HAL/S data 
by describing in detail how each of the HAL/S 
data types could be referenced, using subscripting 
to reference their specific component parts. 

SECTION 7 began building a body of information towards 

the introduction of executable statements by describing 
how expressions of various types could be built up 
by combining operators with data items, literals and 
functions as operands. The topics of precedence 
and type conversion were addressed in the course of 
the section. 

SECTION 8 introduced the assignment sta.»ment, the first 
executable statement to be described in Part I. 

Each type of assignment was individually treated. 

SECTION 9 expanded the repertoire of executable statements 
by presenting the IF statement, by whose means condi- 
tional execution of HAL/S statements could be effected. 
Its use in conjunction with statement labels and 
branches was discussed. 

SECTION 10 formalized the idea of a statement group and 

stressed the importance of the idea from the structured 
progranming standpoint. Various forms of statement 
group were introduced, including versions which caused 
repetitive or selective execution of the delimited 
statements. 

SECTION 11 developed the concept of procedure and function 
blocks as callable entities. The forms of procedure 
and function block definitions were introduced, 
and the use of input and assign parameters explained. 
The manner of invoking procedures and functions was 
presented, and rules for matching argument and para- 
meter lists defined. Lastly, the form and purpose 
of the RETURN statement was pointed out. 


1 
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SECTION 12 concluded the presentation of the HAL/S 
program as a static entity by describing in 
detail how input/output statements are constructed. 

SECTION 13 introduced the new idea of HAL/S as a real 

time programming language. The concept of real time 
processes executing at run time under the control 
of a Real Time Executive was presented. The form 
of the task block, the static counterpart of a real 
time process was described, and the SCHEDULE state- 
ment for the creation of real time processes defined. 
Other constructs for the handling of processes, among 
them the TERMINATE, WAIT, and UPDATE PRIORITY state- 
ments, were explained. Finally, a complete exaiaple 
showing the assembly of the constructs into a viable 
real time program was described. 


14-3 


k 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 661-1040 


T 





INDEX 


ABS 

7-32 


ABVAL 

7-33 


active (state) 

13-22 


addition and subtraction 

7-3, 

7-4, 

algebraic functions 

7-33 


argument list (function) 

11-7, 

11-8 

argument passage (function) 

11-7 


arithmetic functions 

7-32 


arithmetic operations 

7-1, 

7-2 

arithmetic precedence 

7-23 


array 

4-2, 

4-8, 

array subscripting 

6-1, 

6-8 

arrayed data types 

6-8 


array and component subscripting 

6-10 


ARRAY 

4-8, 

4-12 

assign arguments 

11-14 


assignment statement 

7-1 


asterisk 

6-6, 

6-11 

asterisk, in subscripts 

6-5 


attributes 

4-8 


AT 

6-5, 

6-6 

AT time 

13-16 


attributes (function type) 

11-4 


augmented IF statement 

9-4 



7-5 


12-6 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 66M840 



1 


I 


1 


} 


I 


binary literal strings 

2-7 

bloclc closing 


11-4 

block definitions 


11-2 

block definitions 

(relative position) 

11-2 

blocks 


1-2 

block structure 


1-2 

Boolean 


2-4, 

4-10 



9-12 

Boolean 



data type 


4-2 

operations 


7-20 

precedence 


7-24 

subscripting of 


6-1 

boolean parameter 


11-10 

boolean parameter 

(argvunent type) 

11-10 

branches 


9-15 

branching 


10-15 

break points 


13-6 

built-in functions 


7-32 

built-in function 

names 

2-2 

catenation 


7-18 

character 


4-7, 

data type 


4-2 

functions 


7-34 

operations 


7-18 

precedence 


7-23 


f 


f 


2 - 1 , 

4-11, 

10-5 


4-10, 


9-2, 

9-7, 


4-11 


INTERMETRICS INCORPORATED • 701 CONCORD AVENUE • CAMBRIDGE, MASSACHUSETTS 02138 • (617) 66i-1840 



1 


character parameter 

11-9 


character parameter (legal argument types) 

11-9 


character parameter (working lengtn) 

11-10 


character string literals 

2-4, 

2-6 

character set 

2-1 


character subscripts 

6-1, 

6-2, 

channels 

12-1, 

12-4 

class I operators 

9-7, 

9-10 

class II operators 

9-7 


class II 

9-8, 

9-10 

CLOSE 

11-4, 

13-12 

colon 
use of 

use in array subscripting 

6-10 

6-8, 

6-9, 

columns 

12-1, 

12-13 

combining operations and precedence 

7-23 


combining comparative operations 

9-12 


comma 

in declarations 

use in double precision VECTOR conversions 
use in double precision MATRIX conversions 
use of 

4-9 

7-28 

7-30 

12-9 


comments, HAL/S 

2-10 


comment lines 

2-11 


comparative operations 

9-7 


complement 

7-20 


compound statements 

1-8, 

10-13 
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! 


compound declarations 


4-9 


component subscripting 


6-1 


component subscript 


6-11 


conditional statement 


9-1, 

10-1 

cond 


10-5 


conjunction 


7-21 


control variables 


10-5, 

10-10 

contKol 


10-2 


CONSTANT 


4-10, 

4-11 

COS 


7-33 


crossproduct 


7-7 


data declarations 
position of 


1-3, 

3-2 

4-1, 5-1 

data fields 


12-4, 

12-8, 

12-5, 12-6 

12-11 

data formats 


12-6, 

12-9 

data referencing 


6-1 


data storage 


12-4 


data subscripting 


6-1 


data types 


4-1 


DATE 


7-34 


decimal notation 


2-4 


DECLARE 


4-9 


declaration of local data 
functions) 

(procedures & 

11-6 


declaration of local data 

(position) 

11-6 


declaration of local data 
example 

(task block) 

13-11 

13-11, 

13-12 


k 
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declaration of parameters (position) 

11-6 



declaration of parameters (procedures & 

11-6 



functions) 



declaration statements 

4-3, 

4-10 


delimiters 

2-2 



delimiting statement groups 

10-1 



device attributes 

12-18 



device mechanism 

12-1, 

12-8 

12-2, 

12-5, 

device mechanism positioning 

12-12 



division 

7-5 



DIV 

7-32 



DO statement 

10-2 



DO CASE statemei.t 

10-13 



DO CASE. . .ELSE 

10-14 



DO . . . END 

10-4 



DO FOR statement 

10-5, 

10-8 


DO FOR 

10-10, 

10-18 

, 10-20 

DO UNTIL statement 

10-7 



DO WHILE statement 

10-5 



DO WHILE 

10-16, 

10-18 

, 10-20 

Dot Product 

7-6 



DOUBLE 

4-3, 

4-4, 

4-5, 

4-7, 

7-30 

7-26, 

7-28, 


double precision 

4-2, 

4-4 
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ELSE 

9-1, 

9-15 

et6e itCLtmznt 

9-4 


END statement 

10-3 


error recovery 

1-2 


executing (process) 

13-4 


execution, path of 

3-4 


EXIT 

10-17, 

10-16 

EXIT stmt 

10-15 


exponents 

2-8, 

2-9 

exponentiation 

7-13 


expressions 

7-1 


EXPRESSION 

7-1 


zxpxtiition 

7-26 


exp 

7-27, 

12-4 

7-28, 

EXP 

7-33 


factored declaration 

4-9 


FALSE 

9-1, 

9-7 

9-2, 

iinal 

10-8 


floating point 

4-1 


flow of execution 

3-3 


flow of execution (program block) 

13-12 


flow of execution (task block) 

13-12 


format 

2-8 


single line 

2-8 


multi line 

2-9 
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f ract:onal-valued literal 

2-5 


full word 

4-3 


function block 

1-2, 

1-3, 

function (input parameters) 

11-1. 

11-4 

function, invocation of 

11-2 


function invocations 

11-7 


illegal function invocation (example) 

11-12 


legal function invocation (exaunple) 

11-10, 

11-11 

function opening 

11-4 


function return 

11-19 


function name 

1-4 


functions 

11-1 


GO TO statement 

1-8, 

9-17 

GO TO 

9 - 1 , 

10-15 

GO TO statements 
elimination of 
and statement groups 
legal destinations 
block structure 

9-18 

1-8 

1-9, 

1-10 

1-10 

halfword 

4-3 


horizontal positioning 

Kl 

1 

to 


identifiers 

2-2, 

4-2, 

2-3, 

5-1 

IF clause 

9-1 


IF statement 

9-2 


imbedded comment 

5-1 


implicitly-declared data items 

4-1 
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inactive (state) 

INC 

INITIAL 

init 

initiation (delayed) 
examples 

initiation (process) 
example 

initialization of data 
I/O device 

input/output formatting 

input/output statements 

integer 
data type 

integral-valued literals 
Intersection 

integer/scalar parameter 

integer/scalar parameter (legal argument 
type 

inversion 

INVERSE 

)ceywords 

label 

label ( AtcUement ) 

labels 

LENGTH 

lim 

LINE 


13-22 

10-8 

4 - 10 , 4-11 

10-8 
13-15 

13 - 15 , 13-16 

13-13 

13-14 

4-10 

12-1 

12-11 

12-1 

4 - 10 , 4 - 11 , 6 - 1 , 7-1 

4 - 1 , 4-3 

2-5 

7-22 

11-9 

11 - 9 
7-13 
7-33 

2 - 2 , 4-3 

3 - 1 , 3 - 2 , 9 - 15 , 

9 - 17 , 10-3 

9-2 

9-15 

7-34 

12 - 1 

12 - 15 , 12-16 
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literals 

2-1, 

5-1 

2-2, 

2-4, 

local data 

1-4 



LOG 

7-33 



matrix 

4- 5, 

5- 2, 

4-11, 

6-1, 

4-12 

7-1 

matrix arguments 

11-14 



matrix argument (subscripting) 

11-14 



matrix conversion 

7-29 



matrix, data type 

4-1 



matrix parameter (function) 

11-8 



matrix subscripting 

6-5, 

6-6, 

6-7 

MAX 

7-34 



MIN 

7-34 



miscellaneous functions 

7-34 



multi^line format 

2-9 



multiple exponents 

2-5 



multiplication 

7-0, 

7-11 

7-9, 

7-10, 

multi'^processing 

13-2 



multi--valued data items 

4-10, 

12-9 


multi-valued data 

4-11, 

4-12 


multi-valued expressions 

12-6 



NAME 

4-3, 

4- 6, 

5- 1 

4-4, 

1-7, 

4-5, 

4-8, 

negation 

7-2 



nesting 

1-2, 

1-8 
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nested substitution 
ODD 

operators 

order of initialization 
overriding precedence order 
output listings 
PAGE 

paged I/O device 

parenthesis 

use of in expressions 
Boolean 

partial initialization 

prece«*.cnce (relational) 

precision conversion 

primal process 

PRIO (built-in function) 

priority 

priority scales 

procedure (assign parameters) 

procedure (input parameters) 

procedure invocation 

procedure invocation (assign parameters) 

procedure invocation (CATJ. statement) 

procedure invocation (input arguments) 

procedure invocation (passing of argument 
lists) 

procedure invocation (position) 
legal procedure invocation (example) 


5-2 

7-32 

2-2 

4-12 

7-25 

2-1 

12 - 15 , 12-16 

12 - 3 , 12 - 4 , 12-18 

7-1 

7-25 

4-13 

9-13 

7 - 17 , 7 - 26 , 9-11 

13 - 2 
13-22 
13-2 
13-6 

11 - 1 , 11-3 

11 - 1 , 11-3 

11-13 

11-13 

11-13 

11-13 

11-14 

11-2 

11015 , 11-16 
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procedure openi’ 

11-3 


procedure block 

1-2, 

1-3, 

procedure name 

1-4 


procedure return 

11-18 


procedures 

11-1 


procedures and functions 

11-18 


process dependency 

13-7 


process states 

13-4 


process swap 

13-5 


program block 

1-2, 

3-1, 

program block name 

1-4 


program closing 

3-2 


program opening 

3-1 


pseudo- functions 

12-12 


pseudo-real time 

13-1 


quota cion marks 

5-1 


RANDOMG 

7-34 


READ statement 

12-8, 

12-9, 


12-11, 

12-12 


12-16, 

12-18 

ready (process) 

13-5 


REPEAT statement 

10-15, 

10-18 

real time built-in functions 

13-22 


real time concepts 

13-1 


real time control 

9-2 


real time features 

13-1 



5-1 


5-1 


12 - 10 , 

12-13, 


10-19 
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real time process 

13-1 


sample real time progreim 

13-23, 

13-26 

13-24 

recursion 

1-4, 

1-7 

relational expressions 

9-7, 

9-12 

repetition (literal) 

2-7 


replace statements 

5-1, 

5-2 

REPLACE 

and block structure 

5-1, 

5-3 

5-2, 

replace parameters 

5-4 


reserved words 

2-1, 

2-2, 

RETURN 

11-18, 

13-12 

RETURN Statement 

13-13 


round 

7-32 


rounding 

7-26, 

10-10 

RTE 

13-2 


RUNTIME 

13-22 


SCALA!:. 

4-10, 

4-11 

scalar, data type 

4-i 


scalar 

4-4, 

7-1 

scalar subscripts 

6-1 


SCHEDULE 

13-5 


SCHEDULE Statement 

13-2, 

13-13 

scoping 

1-3 


scoping of block names 

1-4 


sequence (Boolean) 

7-24 



13-25, 


10-15 


5-3 


5-1 


10-12 


6-3 
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sequence (precedence) 

7-23 


sequential I/O 

12-1 


semicolon, use of 

2-10 

, 4-8 

separators 

2-2 

(see special 
characters ) 

SIGN 

7-32 


SIN 

7-33 


SINGLE 

4-3, 

4-4, 4-5, 


^-6, 

7-26 

single line format 



single precision 

4-2 


SKIP 

12-15 

, 12-16 

source text 

2-1, 

2-8, 5-1 

special characters 

2-1, 

2-2 

SQRT 

7-33 


active state 

13-4 


inactive state 

13-4 


major state indication 

13-22 


minor process states 

13-4 


^tautmznt 

9-2, 

9-15 

statement delimiting 

2-10 


statement grouping 

1-8 


statement groups 

10-1 


statement labels 

1-10 


stream-oriented I/O 

12-4 


structures 

4-2, 

6-12 

structured progr aiming 

1-2 
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structuring 

1-1 



subroutines 

1-1 



subscripts 

2-8, 

2-9 


subscripts of unarrayed data items 

6-1 



symbolic name 

5-1 



TAB 

12-13 



Task block definition 

13-7 



task definitions (relative position) 
TAN 

task closing 

13-9 

7-33 

13-10 



task closing (example) 

13-10 



Task opening 

13-10 



TERMINATE 

13-5, 

13-12 


TERMINATE Statement 

13-18 



TO- 

6-5 



transpose 

7-6, 

7-13, 

7-16 

TRUE 

9-1, 

9-7 

9-2, 

9-4, 

UNIT 

7-37 



unpaged I/O device 

12-1, 

12-8, 

12-2, 

12-18 

12-3, 

uni-valued data 

4-10 



uni-valued data items 

12-9 



uni-valued expressions 

12-6 



UPDATE PRIORITY 

13-5 



UPDATE PRIORITY Statement 

13-21 
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4-10, 

4-11 

vox 

10-8 


vector 

4-6, 

7-1 

5-2, 

VECTOR 

4-11. 

4-12 

vector arguments 

11-14 


vector argument (subscripting) 

11-14 


vector conversion 

7-27 


vector, data type 



vector - matrix functions 

7-33 


vector parameter (function) 

11-8 


vector subscripts 

6-3, 

6-4 

vertical positioning 

12-15 


WAIT 

13-5 


WAIT statement 

13-19, 

13-20 

Waiting (process) 

13-5 


well-bracketed 

1-8, 

10-1 

WRITE statement 

12-4, 

12-5, 


12-12, 

12-18 

12-13 


6 - 1 , 
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